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by Robert Saturn 

Apple version by William Morris and John Cope 

Broadway is a simulation for an Appie® with 48K RAM. 

Broadway opens with a flashing marquee. To begin, the player (henceforth 
called the producer) names the production company. This name appears on 
the weekly report and on the closing notice at the end of the simulation. The 
program will accept any string (no commas, no double quotes) up to twenty 
characters and spaces. 

After a basic introduction and some instructions, the producer attempts to 
raise $1,000,000 to produce the show. As in the real world, past performance 
(as shown by a randomly generated "track record") controls the ease with 
which you can raise the money. The names entered in this section have no 
bearing on the amount of money raised (that is controlled by a random 
number in conjunction with the "track record"), but using the names of 
friends and relatives adds to the fun of the simulation. If you fail to finance 
the show within eight tries, the simulation ends, but you can try again with a 
new "track record." In Broadway, should the producer acquire more than the 
requisite $1 ,000,000 the method used to lose the excess is as true-to-life as any. 



Pre-Production 

With the financial backing in hand, you begin to put the show together. The 
program asks the producer to hire one of three people for each of ten key jobs. 
As each person is hired, his respective fee is added to a running total that will 
be deducted before opening night, and his weekly salary is added to a running 
total that is deducted from the production company's funds each week. Each 
choice also assigns a certain number of quality points to another running total. 
These point values reflect the relative importance of each job. Choosing a 
high-priced employee tends to result in higher quality, but too large a payroll 
can bankrupt the producer. An employee at "Level #1" raises the quahty 
point total, a #2 employee leaves it unchanged, and a #3 employee reduces the 
quality point total. 
Next, the producer must choose a theatre. A larger theatre has a larger 
potential gross (if you can fill it), but also incurs greater expenses. Rent is 
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higher, and the theatre's more complex equipment requires a larger, more ex- 
pensive crew. 

Now the producer must make some decisions about sets, costumes, lighting, 
and so on. Each of your four designers has submitted three designs in his 
respective department. Each design differs in quality, and therefore in cost. 
The one-time fees (for items purchased) and the weekly costs (for items rented) 
are added to the applicable totals on opening night. The program compiles 
quality points for technical appearance as you make each selection. 

Rehearsals and Opening Night 

The rehearsal period is five weeks. The weekly payroll total is deducted for 
five weeks before opening. The one-time fees are deducted after the rehearsal 
period is over. At this point, the director has the option of calling for further 
rehearsals (a random function). Each extra week of rehearsals costs the pro- 
ducer one week's payroll. Here's where a high payroll and high technical ex- 
penses, coupled with a few extra weeks of rehearsal, can put the producer out 
of business. On opening night, you will get a report of the total weekly cost 
figures. These figures, of course, are minimums. Salary changes and advertis- 
ing will add to the weekly costs. 

The procedure for generating reviews is as follows: Each of the five reviewers 
has five reviews upon which to draw. They range from great to very poor. 
Simon, of Afew York Magazine, always gives a bad review (a little humor for 
those familiar with the New York theatre scene). To determine which of the 
five reviews to use, the program doubles the quality points earned for person- 
nel, adds the quality points earned for technical appearance, and multiplies the 
total by a random number ranging from one to ten (this simulates the 
reviewer's mood). The process repeats for each of the five reviewers. Thus five 
different people can see the same show, yet write five different reviews, a fre- 
quent occurrence on Broadway. As each review appears, the show earns box 
office points. Better reviews earn more points. More points mean more ticket 
sales. Advertising also affects box office points (one point for each $10,000 
spent per week), ticket price (high prices keep people away), aging of the show 
(the longer a show runs, the harder it is to get an audience), and random events 
that will be explained later. 



The Run 

After seeing the reviews, the producer has the option of closing the show, 
and returning what remains of the original $1,000,0(X) to the investors. Also, 
you may exercise this option after getting the report each week. If the show re- 
mains open, the producer must decide how much to spend on advertising each 
week. You can spend any amount, from zero to all the available funds after 
payroll expenses. The money used for advertising becomes part of the weekly 
expense only for the week in which it was allocated. Use no dollar signs or 
commas when you tell the computer how much to spend on advertising. 

The current ticket price then appears on the screen, and you can increase or 
decrease it by any whole dollar amount. At this point, a random event may oc- 
cur (usually every three or four weeks). Both good events and bad events are 
possible — and all will affect the box office action in one way or another. The 
two events dealing with pay raises increase your weekly payroll directly. The 
other events will increase or decrease your current total of box office points. 

Then the weekly report appears. The program figures the number of tickets 
sold for the week, using a formula based on box office points, the original 
quality points of the show (before the critics influenced the public), a random 
number (to simulate the public mood), and the seating capacity of the theatre. 



After multiplying the number of tickets sold by the current ticket price, it 
displays the gross and deducts the week's expenses, yielding the net profit. Any 
loss is deducted from previous profits. If the show has had no previous profits, 
the loss is deducted from what remains of the original $1,000,000. If the front 
money is exhausted, the producer is out of business. In addition, every thirteen 
weeks, you must pay the investors a quarterly payment of 98 percent of the 
current profits, before you buy advertising or attempt to cover losses. 

You may close the show after any weekly report. When the producer closes 
the show, the program posts the closing notice, pays the salaries for the final 
two weeks (with the salary bonds posted before opening), and displays the 
final totals, which show, among other things, the percentage of return to the 
investors. 

Good luck with your show — and break a leg! 



Variables 



A: Color for plotting intro banner. 
A$, B$, C$: Contains the words 
for the marquee. 

AA: Flag to indicate when to play 
music during marquee display. 
AD: Advertising budget for the 
current week. 

AI: Amount raised from investors. 
AN$: Answers to yes-no questions. 
B: Used in delay loops. 
C: Counter for week number. 
CP: Theatre capacity. 
D: Used in computing popularity 
of play. 

DY: Duration of tone. 
Fl, F2, F3: Initial fees. 
FIT: Used to calculate IT. 
FM: Amount of "front money" 
left. 

H: A number from one to three, 
input from the user. 
I: Determines investor's reaction. 
IC*); Relative values of the dif- 
ferent workers or other expenses. 
1$: Name of investor. 
IT: The quality of the company. 
lU: The quality of the set, lights, 
sound, etc. 

IV, IX: The overall quality of the 
production. 

LA, LB: Number of periods to be 
added to A$ and B$, respectively. 
LT: Length of text to be word- 
wrapped. 

J: Miscellaneous loops. 
J$: Job or expense name. 
N: Counter. 
NT, NY: Notes to be played. 
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P, P5: Total weekly expenses. 
P8, P9: Popularity of play. 
PRODS: Name of production com- 
pany. 

PX: Total start-up expenses. 
PY: Temporary storage for a frac- 
tion of P. 

R: Producer's "track record," the 
percentage of previous shows that 
have succeeded. 

Rl: Critic's rating of the produc- 
tion. 

RT: Investor's percent return. 
SD: Profit to be paid to investors. 
SF: Total amount paid to in- 
vestors. 

SN: New ticket price. 
SP: Current ticket price. 
ST: Net profit or loss for the cur- 
rent week. 

T$: Text passed to word- wrap 
routine. 

TG: Current week's gross. 
TI: Used in timer loops. 
TR: Adjustment to investor's reac- 
tions based on player's track 
record. 

TS: Number of tickets sold this 
week. 

TX: Theatre's percentage of the 
gross. 

W: Counter for weeks. 
Wl, W2, W3: Weekly royalties. 
W(*): Weekly cost of a given 
employee or expense. 
WA: Delay loop variable. 
WK: Number of weeks the produc- 
tion has been playing. 
X,ZZ: Miscellaneous loops. 
BROADWAY 
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If you don't wish to typs this program. 
Is available on Issue #44 SoftSide DV. 



Initialization. 

100 TEH : PRINT CHR$ !21): HOHE 
110 GOSUB 3110: GOSUB S140: GOTO 

190 
Music. 

120 m - 70:Dy = 50: GOSUS 150:NT 
= 53:DY = 150; GDSUB 150:NT 

= loa:DY = 150: Gosus 150:D 

Y = 50; 60SUB 150: BDSliB 150 
130 FOR LOOPl = I TO 2:NT = 72:D 

Y = 150: SOSUB 150: NT - lOS; 
DY = 150: GOSUB 150:DY = 50: 

eOSUB 150: GOSUB 150: NEH 

lOOPl 

140 NT = 8i;Dy = 200 

150 IF n = THEN 

Y, INT (NT / 2) 

liO IF n = 1 THEN 

POKE 920, DY: call 929: RETURN 
170 IF n = 2 THEN %. SNT.40 « D 

Y,!0: RETURN 
IBO END 

Get the name of the production 
company. 

190 HOME : VTAS 10: PRINT "WHAT 
WILL YOU NAME YOUR PRDDUCTIO 
N": PRINT "CQflPANY? (hAl. 20 
LETTERS)": PRINT 

200 INPUT "NAME: "I PRODI: IF PRO 
D$ = "" THEN 190 

210 PRODi = LEFT* (PR0D$,20) 

220 PRINT "FROM NOW ON THIS COHF 
ANY WILL BE KNOWN AS ': PRINT 



GOSUB 150: RETURN 
4 TNT, 50 * D 

RETURN 
POKE 927, NT: 



230 PROB$ = FRQDt + " PRODUCTIONS 

240 INVERSE : HTAB (20 - INT ( LEN 

(PRODS) / 2)): PRINT PRQDt: NORMAL 
•M = 1: GOSUB 120:VX = 
Ask If the player wants instructions. 

250 PRINT : PRINT "DO YOU liANT I 

NSTRUCTIONB? "I 
260 GET ANt: IF AN$ < > "Y= AND 

AN$ < > "N" THEN 260 
270 IF AN* = »N" THEN 3B0 

instructions. 

2S0 HOME : PRINT ; PRINT "HERE I 
S YOUR CHANCE TO PRODUCE A": 
PRINT "BROADWAY MUSICAL SHO 
W. WHILE" 

290 PRINT "THE SCENARIO IS SOMEW 
HAT SIMPLIFIED,": PRINT "YOU 
WILL FACE MANY OF THE SAME" 

300 PRINT "PROBLEMS AND TAKE MAN 
Y OF THE SAME": PRINT "CHANC 
E5 THAT ANY BROADWAY PRODUCE 
R": PRINT "DDES:" 

310 PRINT 'YOU WILL HAVE TO RAIS 
E THE FRONT": PRINT 'MONEY W 
HICH WILL PAY YOUR EXPENSES" 

320 PRINT "UNTIL THE SHOW OPENS, 
DECIDE WHO": PRINT "TO HIRE 

AND HOW MUCH TO PAY THEM," 
330 PRINT "ENDURE CRITICS AND FE 

EL THE INFLUENCE": PRINT "TH 

AT THEY HAVE, AND PLAY THE W 

EEK TO" 
340 PRINT "WEEK GAME OF COUNTING 
THE AUDIENCE,': PRINT "THE 

TICKETS, THE MONEY AND THE P 

ROFITS" 
350 PRINT "(OR LOSSES'!).": PRINT 

: PRINT "BREAK A LE6 AND BRI 

NG IN A HIT BUT" 
360 PRINT "REMEMBER: THERE'S A 

BROKEN HEART": PRINT "FOR EV 

ERY LIGHT ON BROADI*AY..," 
370 SOSUB 3340 



Raise the front money. 

380 FK = 100COOO:R = INT ( RND i 

1) « 100) + l:TR = R / 50; IT 

= l:SP = lAlIU = l; HOME 

390 PRINT "FOR THE PURPOSES OF T 

HI5 SinULATION,"; PRINT "VCl! 

WILL GET 6 CHANCES TO RAISE 

400 PRINT "A TOTAL OF "j: INVERSE 

: PRINT "ti, 000, 000";: normal 

: PRINT ■' TO FINANCE": PRINT 

"VOUR SHOW." 
410 PRINT "YOUR TRACK RECORD ON 

PREVIOUS SHOWS IS ";Ri";;. T 

HIS WILL DETERMINE HOW EASY" 
420 PRINT "IT IS FOR YOU TO RfllS 

E MONEY. ":AI = C:C = 1 
430 PRINT : PRINT ; PRINT "INVES 

TOR #: ";c 
440 INPUT "WHOM WILL YOU ASK" "; 

i$;l = ( INT ( RND (!) » 25) 

+ 1) * TR: HOME 
450 IF I < 2 THEN Tt = 1$ <■ " Sfi 

ID, " + CHR$ (34i + "TH SO 

RRY, BUT NO." + CHR$ (34): I 

= O: GOTO 5i0 
460 IF 1 < 5 THEN Ti = U + ' TH 

INKS YOU'RE CRAZY, BUT WILL 

INVEST": GOTO 540 
470 IF 1 ( 7 THEN T$ = 1$ + ". W 

HO CAN'T REALLY ftFFQRC MUCH, 
WANTS TO HELP WITH": GOTO 5 

bO 
4B0 IF I < 10 THEN T$ = IJ + " N 

EEDS A TAK WRITE-OFF AND WIL 

L INVEST"; GOTO 560 
490 IF I < 12 THEN T$ = It + ", 

WHO IS STILL WORKING ON THAT 
FIRST MILLION, WILL INVEST' 

: GOTO 560 
500 IF 1 < 15 THEN Tt = It + ", 

WHO INVESTS IN ANYTHING, THI 

NKS YOU HAVE A WINNER AND IN 

VESTS": GOTO 560 
510 IF 1 < 17 THEN T$ = li + " L 

OVES TO THROW MONEY AWAY AND 
INVESTS": GOTO 560 



520 


IF I < 20 THEN T$ = 1$ t " ! 




WHO HAS NO TASTE) HAS FAITH 




IN YOU AND YOUR SHOW AND INV 




ESTS"; SOTO 560 


530 


IF I < 22 THEN Tt- = It + ', 




WHO HAS TURNED DOWN EVERY DT 




HER PRODUCER ON BROADWAY, Sft 




YS 'YES-' AND INVESTS": GOTO 




560 


540 


IF I < 24 THEN Tt = It + », 




A NOTED PATRON OF THE ARTS, 




INVESTS": GOTO 560 


550 


T$ = It + ", WHO IS FABUL0U3L 




Y WEALTHY, INVESTS" 


560 


11=1* 10000;Tt = Tt T " 1" 




+ STRt (ID t ".": VTAS 7: 




GOSUB 3290: PRINT :ftl = INT 




iAI + ID 


570 


PRINT "SO FAR YOU HAVE RAISE 




D ";; INVERSE : PRINT "t"iAI 




: NORMAL : IF AI > = FM THEN 




GOTO 650 


580 C = C M: IF C = 9 THEN GOTO 




600 


590 


PRINT "YOU STILL NEED ";; INVERSE 




; PRINT °f;FM - ftl: NORMAL 




; GOTO 430 


600 


PRINT ; PRINT "SORRY, YDU CO 




ULDN'T RAISE THE HONEY.": PRINT 




"THAT'S SHOW B12!il" 


610 


VTAB 21: HTAB 6: INVERSE ; PRINT 




"WANT TO TRY AGAIN'";: NORHAl 


620 


GET AN$; IF ANt < > "Y» AND 




ANt < > 'N" THEN 610 


630 


IF ANt = "Y" THEN PRINT : GOTO 




190 


640 


HOME : END 


650 


IF AI = FM THEN PRINT ; PRINT 



"YOU HAVE EXACTLY tlOOOOCO." 
; GOTO 690 
660 PRINT ; PRINT "THAT'S ";: INVERSE 
; PRINT "f; INT (AI - FH)i: 
NORMAL : PRINT " EXTRA!": FDR 
Wft = 1 TO 1200: NEXT WA 
670 PRINT : PRINT "YCU HAVE RAIS 
ED THE MONEY.": PRINT "YOUR 
■ GENERAL MANAGER WILL STEAL" 
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hB'J PRINT "THE EXTRft $"; INT (ftl 

- FH) 
690 GOSUB 3340: HOME : GOSUB 120 

: PRINT "NOW THAT VOU HAVE R 

ftlSED THE HONEY,": PRINT "VO 

U HUBT DECIDE HOW TO SPEND I 

T. FOR" 
700 PRINT "EACH OF THE ilAJOR EXP 

ENSES PRESENTEC": PRINT "TO 

YOU, DECIDE ON HOW MUCH TO 3 

PEND" 
710 PRINT "INITIALLY AND WEE[(LY. 
DURING THE": PRINT 'FIRST F 

IVE WEEKS IWHILE YOU ARE" 
720 PRINT "REHEARSiNB) THERE WIL 

L BE NO INCOME,": PRINT "SO 

MAKE SURE THAT YOUR EXPENSES 
DO" 
730 PRINT "NOT EXCEED $1,000,000 
OR YOU'LL HAVE": PRINT "NOT 

HINS LEFT FDR DELAYED DPENIN 

6S, " 
740 PRINT "ADVERTISING, ABSORBIN 

G A LOSS FOR": PRINT 'A WEEK 
OR Tk'O, AND THE FACT THAT ft 

750 PRINT "FULL HOUSE EVERY NIGH 
T «ILL ONLY": PRINT "GROSS B 
ETWEEN $150,000 AND $225,000 

760 PRINT "YOUR OBJECT, OF COURS 
E, IS TO SHOW ft": PRINT "PRO 
FIT EACH WEEK. REHEHBER, OUT 
OF" 

770 PRINT "YOUR FRONT MONEY YOU 
MUSTS PAY ALL": PRINT "DF YO 
UR PRE-OPENING EXPENSES (E.G 



780 PRINT "SETS, COSTUMES, ETC.) 

790 GOSUB 3340 
Fixed expenses. 

800 HOME : PRINT : PRINT '■,.. FI 
RST YOU MUST HIRE A COMPANY. 

310 PRINT "CERTAIN WEEKLY PAYROL 
L EXPENSES': PRINT 'ARE ASSU 
MED:" 
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320 



830 



840 



850 



PRINT "1 5,000 FOR CONTRACT 
STAGEHANDS': PRINT "$ 3,000 
FOR WARDROBE DEPT." 
PRINT 'i 3,000 FOR CONTRACT 
MUSICIftNS": PRINT "J 750 F 
OR PRESS REPS.' 
PRINT "i 6,000 FOR HANASEMEN 
T STAFF": PRINT "$ 2,500 FOR 
STAGE HflNABEMENT" 
PRINT "M7,500 FOR NON-STARR 

ING ACTORS": PRINT " " 

: PRINT "$37,950":P = 37950 

Negotiated salaries. 

360 PRINT : PRINT "WE WILL NOW D 
EAL WITH THE SALARIES": PRINT 
"THAT CAN BE NEGOTIATED" 
GOSUB 3340 

HOME : VTAB B: PRINT "FOR EA 
CH JOB YOU iiilLL BE GIVEN 3": 

PRINT "ALTERNATIVES. IN BE 
NERAL THE MORE" 
PRINT "YOU SPEND, THE HIGHER 

CALIBER OF": PRINT "PERSON 
YOU WILL HIRE AND THE BETTER 



370 
8B0 



890 



900 



910 



920 
930 

940 



950 



960 



970 



PRINT "THE RESULTS (MAYBE). 
OF COURSE, THE": PRINT "MORE 
YOU SPEND, THE HIGHER YOUR" 
PRINT "WEEKLY PAYROLL WILL B 
E, SPEND THE ": PRINT "MONE 
Y WHERE YOU THINK IT'S IMPDR 
TftNT" 

GOSUB 3340 

RESTORE ; FOR ZZ - 784 TO 94 
9: READ N: NEXT ZZ 
FOR C = 1 TO 12: HOME : READ 
JS,Fl,Wl,F2,W2,F3,W3,n,I2,I 

3:IM) = ll:l(2) = I2:l(3) = 

13; PRINT "JOE-";J$: PRINT 

VTAB 5: HTAB 7: INVERSE : PRINT 

•INITIAL FEE";: HTAB 20: PRINT 

"WEEKLY ROYALTY": NORMAL 

VTAB 7: PRINT "1";: HTAB 7: PRINT 

"$"iFli: HTAB 20; PRINT '$"; 

U! 

VTAB 9: PRINT "2"|; HTAB 7: PRINT 

"t";F2i: HTAB 20: PRINT "$"; 

W2 



980 VTA8 11: PRINT "3";; HTA3 7: 
PRINT "$")F3!; HTAE 2(!: PRINT 
"$"iS3 
990 Ir'TAB 14: PRINT "WHICH ")J$|" 
WILL YOU HIRE' ": PRINT "(1 
, 2 OR 3) ";: GET H$:H = VAL 

m) 

1000 IF H = 1 THEN PI = PX + Fl: 

P = P + Wl: GOTO 1040 
1010 IF H = 2 THEN PK = P)! + P2: 

P = P + W2: GOTO 1040 
1020 IF H = 3 THEN FX = PX + F3: 

P = F + iJ2; 6QTC 1C40 
1030 PRINT : GOTO 990 
1040 IT = IT « i!H); NEXT C:IT = 

IT / 1000 
1050 FIT = 2 t (IT > 500) + 1.5 * 

ilT < = 500 AND IT > 200) + 

1.1 t !IT < = 200 AND IT > 

70) 
1060 FIT = FIT + ilT ( = 70 AND 

IT } 1) + 0.75 « (IT < = 1 AND 

IT > = 0.1) + 0.5 ♦ (IT < C 

.1) 
1070 IT = FIT: HOME : PRINT 

Select the theatre. 

loeo PRINT "YOU NOW HAVE A COHFA 

n^ TO am: yiTH.": print 'no 

M DECIDE ON YOUR OTHER EXPEN 
BES.° 
1090 PRINT "THE HOST IMPORTANT I 
S THE THEATRE.": PRINi "AGfil 
ti WE HAVE A CHOICE OF THREE. 

1100 PRINT "THEY DIFFER IN CflPAC 

ITY AND THEREFORE": PRINT "I 

N COST. ASSUME A TICKET PRIC 

E OF $!i" 
1110 INVERSE : VTAS B: PRINT "TH 

EATRE"; 
1120 HIAB 9: PRINT "SEATING";; HTAE 

17: PRINT "POSSIbLE";: HTAE 

24: PRINT "COST iX OF" 
1130 HTAB 17: PRINT "WEEKLY";: HTAB 

2h: PRINT "6R0SS+H0U3E" 
114C HTAB 17: PRINT "GROSS";: HTAB 

26: PRINT "PAYROLL)": NORMAL 



1150 VTAB 12: HTAE 3: PRINT "1"; 

: HTAB 9: PRINT "1400";: HTAB 

17: PRINT '$179,200"; 
lliO HTAB 26: PRINT "22UJI9,OC0 

1170 VTAB 14: HTAE 3: PRINT "2"; 

: HTAB 9: PRINT "1500';: HTAB 

17: PRINT "$192,000"; 
IIBO HTAB 26: PRINT '■•25U$20,000 

1190 VTAB 16: HTAB 3: PRINT "3"; 

: KTAB 9: PRINT "1600";: HTAB 

17: PRINT "$204,000"; 
1200 HTAB 26: PRINT »28X+$21,000 

": PRINT 
1210 VTAB 19: PRINT "WHICH TREAT 

RE? (1, 2 OR 3) ";: GET Ht;H 
= VAL (H$) 
1220 IF H = 1 THEN CP = 1400:TX = 

0.22:PR = 19000: GOTO 126C 
1230 IF H = 2 THEN CP = 15(iO:TX = 

0.25:FR = 20000: GOTO 1260 
1240 IF H = 3 THEN CP = 1600:Ti' = 

0.20:PR = 21000: GOTO 1260 
1250 PRINT : GOTO 1210 

Other fixed expenses. 

1260 HOME : PRINT "NGtl DETERMINE 
YOUR OTHER PRE-0PENIN6": PRINT 
"EXPENSES" 
1270 FOR C = 1 TO 5; READ J$,F1, 
Wl,F2,a2,F3,W3,Il, 12, 13:1(1) 
= Ii:l(2) = 12:1(3) = 13: INVERSE : 

PRINT : PRINT •E);PENSE-";J$: PRINT 
1280 VTAB 5: KTAB 10: PRINT "IMl 

TIAL";: HTAB 20: PRINT "WEEK 

LV"; NORMAL 
1290 VTAB 7: HTAB 2: PRINT "1";: 
HTAB 11: PRINT Fl;: HTAB 21 

: PRINT Wl 
1300 VTAB 9: HTAB 2: PRINT "2":: 
HTAB 11: PRINT F2i : HTAB 21 

: PRINT Wl 
1310 VTAB il: HTAB 2: PRINT "3"; 

: HTAB 11: PRINT F3;: HTAB 2 

l: PRINT W3 
1320 VTAB 13: PRINT "WHICH DESIG 

N VERSION WILL VOU USE? ";; GET 

H5:H = VAL (H$) 
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1330 IF H = 1 THEN PX = PX + Fl: 
PY = py + Wl: SOTO 1370 

1340 IF H = 2 THEN ?1. = P)( + F2: 
py = PY + W2: GOTO 1370 

1350 IF H = 3 THEN PJ = P'* + F3: 
PY = PY + H3; SOTO 1370 

1360 PRINT : BOTQ 1320 

1370 lU = lU » 1(H): HOME : NEH 



BROADWAY 

1500 



* (1 
+ 0. 



1390 



MOO 



1410 



1420 



1330 FO = 2 » (lU > 7) + 

U < = 7 AND lU > = 1) 
8 * (lU < Il:IU = FU 

HOUE : VTfiE 8: PRINT "THE F; 
EST OF THE FRE-OFENING": PRINT 
"EXPENSES ARE A3 FOLLOWS:" 

PRINT : PRINT "$33,000 TAK 
E IN AND SET UP SHOW": PRINT 
"$30,000 PREOPENING ADVERTI 
SING" 

PRINT "t 5,000 OPENING SIG 
HT PARTY": PRINT "t 3,0C0 T 
RAVELING EXPENSES" 

PRINT "t 1,500 TICKET PRIN 
TING": PRINT "1 3,000 REHEA 
RSftL SPACE" 
1430 PRINT '$10,000 SALARY BOND 

S": PRINT " " 

1440 PRINT "$85,500":Pi( = PK t 8 

5500: eOSUB 3340 

Rehearsal. 

1450 HOME : VTAB 8: PRINT "YOU A 
RE NOW READY TO BEGIN THE FI 
VE": PRINT "WEEK REHEARSAL P 
ERIOD. YOUR PAYROLL" 

PRINT "EXPENSES WILL BE DED 
UCTED AFTER EACH": PRINT "WE 
EK OF REHEARSALS. AFTER THE 
LAST" 

PRINT "WEEK, THE OTHER PRE- 
OPENING EXPENSES": PRINT °WI 
LL BE DEDUCTED." 

GOSUE 3340 

HOME : FOR W = 1 TO 5: PRINT 
: PRINT "END OF WEEK "JW;" 
F REHEARSAL" 



1460 



1470 



1480 
1490 



PRINT "EXPENSES THIS WEEK-" 

;: INVERSE : PRINT "$";p: normal 

:FM = FM - P: if FM < THEN 

FOR Z = 1 TO 3000: NEXT 2: GOTO 

2620 
1510 PRINT "LEFT FROM FRONT HONE 

Y-";: INVERSE : PRINT °$";fm 

: NORMAL : FOR N = 1 TO 1000 

: NEXT N: NEXT W 
1520 GOSUB 3340 
1530 HOME :FM = FM - PX: IF F« < 

THEN 2620 
1540 VTAB 8; PRINT "NOW THAT REH 

EARSALS ARE OVER AND": PRINT 

"YOUR PRE-OPENING EXPENSES A 

RE PAID" 
1550 PRINT "YOU HAVE ";: INVERSE 

: PRINT "$";Ff!;: normal : PRINT 

• LEFT IN AN": PRINT "EMERGE 

NCY ACCOUNT." 
1560 BOSUB 3340 

Possible extra week of rehearsal. 
1570 R = INT ( RND (1) » 10) + 1 

: IF R > =6 THEN 1630 
1580 VTAB 13: HTAB 0: CALL - 95 

8 
1590 HOME : VTAB 9: PRINT "THE D 

I RECTOR WANTS ANOTHER WEEK 

F": PRINT "REHEARSALS BEFORE 
OPENING" 
1600 FM = FK - P: IF FH < THEN 

GOTO 2620 
1610 PRINT : PRINT "YOU NOW HAVE 
"i: INVERSE : PRINT "$";FM; 

: NORMAL : PRINT " LEFT": PRINT 

"IN AN EMERGENCY RESERVE." 
1620 GOSUB 3340 

Opening night. 



1630 
1640 



1650 



HOME : GOSUB 120 

FOR J = 1 TO 4: HOKE : VTAB 
II: HTAB 13: PRINT "IT'S": VTAB 
13: HTAB 13: PRINT "OPENING 
NIGHT" 

FOR B = 1 TO 200: NEXT B: HOME 
: FOR B = 1 TO 70: NEXT B: NEXT 
J:P = F + PY 



U60 VTAB i: PRINT "WELL, HERE U 
E BC. LET'S HAVE A DRINK": PRINT 
"BEFORE THE REVIEWS COME IN. 

1670 PRINT : PRINT "BY THE HflY, 
YOUR REGULAR WEEKLY"; PRINT 
"EXPENSES (INCLUDING THE WEE 
KLY" 

1680 PRINT "TECHNICAL EXPENSES T 
HAT BE6IN": PRINT "TONIGHT) 
AND THE THEATRE RENTAL ARE:" 

1690 P = P + PR: INVERSE : PRINT 

"$";p;: normal : print " plu 

S ";: INVERSE : PRINT TX * 1 

00; "r;: normal ; print " of 

THE gross." 
1700 GOSUB 3340 

Reviews. 

1710 HOME : PRINT : PRINT "HERE 
COMES THE PRESS AGENT WITH T 
HE": PRINT "REVIEWS": PRINT 
: PRINT 

1720 IV = IT * IT + lU 

1730 IX = 2 * !IV > 5) + 1.5 « !I 
V ■; = 5 AND IV > 3) + 1.25 * 
!IV < = 3 AND JV > 2) + 1.1 
» (IV < = 2 AND IV ) n t 
(IV < = 1) 

1740 BOSUB 2040: INVERSE : PRINT 
"KERR-THE TIMES-": NORMAL : ON 



1750, 17iO, 1770,1780, 

THE WORST THING I EV 
':P9 = P9 + l: GOTO 1 



Rl GOTO 

1790 
1750 PRINT 

ER SAW. 

800 
1760 PRINT "WEAK SHOW: POOS ACT! 

NG, POOR DIRECTION"; PRINT " 

POOR, POOR INVESTDRS.":P9 = 

P9 +2: GOTO IBOe 
1770 PRINT "I LIKED IT--WITH RES 

ERyATI0NS.":P9 = P9 + 3: GOTO 

1800 
1730 PRINT "A THOROUGHLY ENJOYAB 

LE EVENING. ":P9 = P9 + 4: GOTO 

1800 
1790 PRINT "A FINE PIECE OF THEA 

TRE.":P9 = P9 + 5 



1800 FOR N = 1 TO 1000: NEXT N: GOSUB 
2040: INVERSE : PRINT "BARNE 
S-THE POST": NORMAL : ON Rl GOTO 
1810,1820.1830,1340,1850 

1810 PRINT "A TERRIBLE SHDW.":P9 
= P9 + l: GOTO 1B60 

1820 PRINT "1 WAS BORED DURING T 
HE FIRST ACT": PRINT "AND GO 
NE DURING THE SECOND. ":P9 = 
P9 + 2: GOTO I860 

1830 PRINT "A PLEASANT EVENING." 
:P9 = P9 + 3; GOTO 1360 

1340 PRINT "MUCH FUN-GO SEE ITi 
":P9 = P9 + 4: GOTO 1860 

1850 PRINT "A MUST SEE! RUN, DON 
'T WALK TO THIS.";P9 = P9 + 
5 

1860 FOR N = 1 TO 1000: NEXT N: GOSUB 
2040; INVERSE : PRINT "WATT- 
THE NEWS-": NORMAL : ON Rl GOTO 
1870,1830,1390,1900,1910 

1870 PRINT "THE WORST PLAY IN MY 
80 YEARS OF": PRINT "REVIEW 
IN6":P9 = P9 + l: GOTO 1920 

1B80 PRINT "THE LAST FLAY I SAW 
THAT WAS THIS": PRINT "BAD « 
AS IN 1904. ":P9 = P9 t 2: SOTO 
1920 

1890 PRINT "NICE. BROUGHT BACK M 
EMORIES OF THE": PRINT "BLAC 
K CROOK-" :P9 = P9 + 3: GOTO 
1920 

1900 PRINT "FUN FOR ALL AGES. BR 
ING YOUR": PRINT "6RANDPAREN 
TS.":P9 =9+4; GOTO 1920 

1910 PRINT "THE BEST THING I'VE 
SEEN THIS CENTURY. •:P9 = P9 + 
5 

1920 FOR N = 1 TO 1000: NEXT N; GOSUB 

2040: INVERSE ; PRINT "SHALI 

T-NBC NEWS-": NORMAL : ON Rl 

GOTO 1930,1940,1950,1960,19 

70 

1930 PRINT "SHOULD NOT BE ALLOWE 
D ANY CLOSER TO"; PRINT "NEW 
YORK THAN BOISE, IDAHO. ":P9 
= P9 + l: GOTO 1930 



BROADWAY 
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I9M 
1950 

I960 
1970 

1980 



1990 
2000 
2010 
2020 
2030 



2050 
2060 
2070 



2080 



PRINT "I'VE SEEN MRSE, BUT 

NOT ,%NY.':P9 = P9 + 2: GOTO 
1980 

PRINT "IT WON'T RUN ANY LDN 
GER THAN DOLLV BUT": PRINT " 
MAYBE LONGER THAN KELLY. ":P9 

= P9 t 3: GOTO 1980 

PRINT "A H0DT.":P9 = P9 + 4 
; GOTO 1980 

PRINT "IF YOU HURRY, YOU CA 
N SET TICKETS FOR"; PRINT "L 
ATE IN 1985. ":P9 = P9 + 5 

FOR N = I TO 1000; NEU N; GOSUB 
20W: INVERSE ; PRINT "SIMON 

-NEW YORK NAG-": NOBtlAi. : ON 
Rl GOTO 1W0.2000, 2010. 2020, 
2030 

PRINT "I HATED IT.":P9 = P9 

+ l: GOTO 2060 

PRINT "A TERRIBLE SKfllil.":P9 

= P9 + 2; GOTO 2060 

PRINT "IT'S THE PIT9.":?9 = 
P9 + 3: GOTO 2060 

PRINT "THE WORST THIS YEAR. 

":P9 = P9 m: goto 206O 

PRINT "I COULDN'T 3TAN0 IT. 
•:P9 = P9 + 5; GOTO 2060 
Rl = INT ! RNB (!) * tC) + 
1:R! = Rl * IV;R1 = INT (RI 

; 9): for TI = 1 to 200: NEXT 
T! 

RETURN 

SOSUB 3060 

HONE : VTAB 8: PRINT "ALL R 
IBHT, THE SHOW IS OPENED.": PRINT 
"AFTER EACH WEEK YOU WILL GE 
T A REPORT" 

PRINT "OF HOW MANY TICKETS 
WERE SOLD": PRINT "AND HOW H 
UCH HONEY WAS TAKEN IN. YOU" 



BROADWAY 
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2090 PRINT "WILL ALSO BE ASKED H 

OW NUCH YOU WANT": PRINT "TO 

SPEND ON ADVERTISING AND IF 

YOU" 

2100 PRW "WANT TO CHANGE THE T 

ICKET PRICE."; PRINT "REMEME 

ER, CHEAPER PRICES = HIGHER" 



PRINT "VOLUME.": GOSUB 3340 
Set advertising budget. 

2120 HOME : PRlNT : PRINT "YOU H 
AVE ";: INVERSE : PRINT "t"; 
FMi: NORMAL : PRINT " LEFT I 
W: PRINT "FRONT MONEY ACCOU 
NT." 

2130 PRINT ; PRINT "HOW hUCH CO 
YOU WANT TO SPEND ON": INPUT 
"ADVERTISING THIS WEEK'' "fAD 

2140 IF AD < THEN VTAB PEEK 
(37) - 2: CALL - 958: SOTO 
2130 

Change ticket price. 

2150 PRINT : PRINT "THE CURRENT 
TICKET PRICE IS "; INVERSE ; 
PRINT ■$";SP: NORMAL ; VTAB 
11: PRINT "DO YOU WANT TO CH 
AN8E THE TICKET": PRINT "PRI 
CE? "; 



2160 



AND 



2170 



2180 



2190 



160 
PRINT 



GET AN4; IF ANt < 
AN$ ( > "N" THEN 

IF ANJ = "N» THEN 
2210 

PRINT : INPUT "CHANGE TO WH 
AT TICKET PRICE? ";3N 

IF SN = SP THEN PRINT "THA 
T'S THE CURRENT TICKET PRICE 
": GOTO 2150 
2200 D = (SP - SN) 1 2;P9 = P9 + 

D:5P = SN 
2210 KK = WK + l: IF WK / 3 = INT 
(WK / 3) THEN P9 = P9 - 2 

IF WK / 10 = INT iWK /■ 10) 

THEN F9 = P9 - 2 

IF WK / 18 = INT (WK / 18) 

THEN F9 = P9 - 2 

IF WK / 13 < ) INT (WK / 
13) THEN 2270 
Distribute profits. 

2250 5E = SE * 0.9:SD = SD - SE:3 
F = BE + SE: PRINT ; PRINT " 
90'/. OF PROFITS DISTRIBUTED T 
0": PRINT "INVESTORS FDR 13 
WEEKS" 

2260 FOR B = 1 TO 1000: NEH B 



GOTO 






30 



2240 




2270 P9 = P9 + AD / lOdOO 
Random events. 

2280 R = RNB (1) « 10: IF R > i THEN 

R = INT ( RND (I) * 12) + 1 

: ON R BOTO 2300,2310,2320,2 

330,2340,2350,2360,2370,2380 

,2390,2400,2410 
2290 GOTO 2420 
2300 PRINT "STftP SETS SICK-t1U3T 

BE REPLACED. ";P9 = P9 - 2: GOTO 

2420 
2310 PRINT "UNIONS GET PAV HIKE. 

":F = INT (P t 1.03): SOTO 

2420 
2320 PRINT "STAR'S CONTRACT ENDS 

-WANTS KORE t$$.":P = INT { 

P t 1.03): GOTO 2420 
2330 PRINT "SHOW WINS 3 TOHVS":P 

9 = P9 + 2; GOTO 2420 
2340 PRINT "FREE PUBLICITY DUE T 

GOOD PRESS AGENT" :P9 = P9 + 

l: GOTO 2420 
2350 PRINT "SHOW WINS CRITIC CIR 

CLE AWARD. ";P9 = P9 + 1: GOTO 

2420 
2360 PRINT "HEAVY SNOW FOR FIVE 

«eeks.":P9 = P9 - i: goto 24 

20 
2370 PRINT "NEWSPAPER STRIKE IN 

IT'S SECOND MONTH. ■:P9 = P9 - 

l: GOTO 2420 
2380 PRINT "T.V. REPORTS ON HIGH 
CRIME IN": PRINT "BROADWAY 

AREA":P9 = P9 - l: GOTO 2420 
2390 PRINT "CTTV REPORTS CONVENT 

ION BUSINESS UP,":F9 = P9 + 

l: GOTO 2420 



BROADWAY 



2400 PRINT "GOOD WORD OF MOUTH 

N THE SH0K":P9 = P9 + 1: GOTO 

2420 
2410 PRINT "BAD WORD OF MOUTH ON 

THE SHOW.":P? = P9 - 1 
2420 VTAB 20: SOSUB 3340 
2430 HOKE : INVERSE : PRINT : HTAB 

(20 - ( LEN (PRODi) / 2)): PRINT 

PRODt: NORMAL : VTAB 4: HTAB 

13: PRINT "WEEKLY REPORT": PRINT 
Weekly statistics. 
2440 PRINT "WEEK "iWKi": ";WK * 

B!" PERFORMANCES" 
2450 PRINT "THEATRE CAPACITY (PE 

R PERFORMANCES: ";CP 
2460 PRINT "TICKET PRICE: nSP 
2470 PRINT "MAHMUM GROSS !PER W 

EEK): $";SP * CP * 8:P8 = P9 

: IF P9 < THEN P9 = 
2480 PRINT : PRINT "TICKETS SOLD 
THIS WEEK: "i:TS = 0:TS = ( 

(n » P8) / 60) » CP * 8: IF 

TS > CP * 8 THEN TS = CP * 8 
2490 PRINT INT ITS) 
2500 PRINT "GROSS THIS WEEK; $'; 

:TG = TS » SP: PRINT INT (T 

G) 
2510 PRINT "EXPENSES THIS WEEK: 

$"i:P5 = P + (TG * TX) + AD: 

PRINT INT {P5) 
2520 PRINT :ST = TG - P5: PRINT 

"NET";: IF ST < THEN PRINT 

" LOSS"; 
2530 IF ST > THEN PRINT " PRO 

FIT"! 
2540 PRINT " THIS WEEK: t") ABS 

( INT (ST)) 
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2550 IF ST < THEN SD = 3D + ST 
THEM FH = Ff! + SD 
(1 THEN 3D = SD + ST 



2560 



^1 V 



IF SD < 
:SD = 
IF ST > 



BROADWAY 
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2580 PRINT "NET PROFIT TO BE PAI 

D TO investors:": print "t"; 

INT (SD) 
2590 PRINT "LEFT FROM FRONT MOfiE 

V $"; INT (FHi: IF FN < THEN 

FOR Z = 1 TO 3000: NEH Z: GOTO 

2d20 
2600 SOSUB 3060 
2610 HOKE : PRINT : BOTO 2130 
Too much money spent. 
2620 HO«E : VTfiS 8: PRINT "YOU H 

AVE SPENT MORE MONEY THAN VO 

U": PRINT "HAVE. THE STATE A 

TTORNEY GENERAL'S" 
2630 PRINT "OFFICE HILL CONTACT 

VOU BY THE FIRST": PRINT "OF 
THE MONTH. THEV ASK THAT B 

EFORE" 
2640 PRINT "THEN YOU TAKE THE TI 

ME TO SEE": PRINT "THE PROD 

UCERS' WITH ZERO MQSTEL TO" 
2650 PRINT "SEE WHERE YOU SENT W 

RONS." 
2660 PRINT ; INVERSE : PRINT »SH 

0W-BI2 STILL IN YOUR BLOOD?" 

;: NORMAL 
2670 GET AN$: IF ANJ < > 'Y" AND 

AN$ < ) "N" THEN 2670 
26B0 IF ANt = "Y" THEN HOME : RUN 

2690 HOME ; END 
Show Is closed. 

2700 HOME : INVERSE : VTAE 4: HTAB 
(20 - ( LEN (PRODJ) / 2)>: PRINT 
PRODt;: NORMAL m = 2: GOSUB 
m-M = 

2710 INVERSE : VTAB 6: HTAB 6; PRINT 
•CLOSING NOTICE 
"; NOR.IAL 

2720 PRINT ; PRINT "IT IS WITH G 
REftT REGRET THAT WE": PRINT 
"POST THIS NOTICE. WE BANT T 
THANK" 



PRINT "ALL OF YOU FOR ALL 
F YOUR HARD": PRINT "WORK. P 
LEASE BE ADVISED THAT THIS" 

PRINT "PRODUCTION KILL CLOS 
E TWO WEEKS FROM": PRINT "TO 
NIGHT, AGAIN, THANK YOU." 

PRINT : PRINT : PRINT "S!NC 
ERELY YOURS": INVERSE : PRINT 
: PRINT PRODt: NORMAL : PRINT 
: PRINT "YOUR FINAL TOTAL TO 

FOLLOW 

GOSUB 3340 



750 



2760 

Final statistics. 

2770 HOME : VTAB 3: HTAB 3: INVERSE 
: PRINT "FINAL TOTALS:": NORMAL 
: PRINT : PRINT "YOUR SHOW R 
AN FOR "iWK;" KEEK" CHRS (83 
« (WK < > D): PRINT "BEFO 
RE CLOSING." 

2780 PRINT "THAT'S "INK * 8!" PE 
RFORMANCES." 

2790 PRINT "OUT OF YOUR ORIGINAL 
tl, 000, 000 YDU"; PRINT "HAD 
fi INT (FM);" LEFT WHICH H 
AS BEEN" 

2800 PRINT "GIVEN BACK TO YOUR I 
NVE3T0RS.": PRINT 'TOTAL AMO 
UNT PAID TO INVESTORS:": PRINT 
"$• INT (SD + BF t FM)"."i 

2810 PRINT "THAT MAKES A "i INT 
(SD + SF + FM - 1E6) / 10000 
\"l RETURN": PRINT "ON THEIR 
INVESTMENT." 

2B20 PRINT "(A OX RETURN IS THE 
BREAK-EVEN": PRINT "POINT FO 
R YOUR INVESTORS." 

2830 PRINT "A NEGATIVE RETURN IS 
A LOSS!:": GOTO 2660 

Machine language data. 

2B40 DATA 201,83,240.7,201,34,24 
0,55,76,201,222,32,132,3,138 
,41,15,133,255,165,253,133,2 
51,198,251,208,25,173,43,192 
,165 

2850 DATA 253,133,251,164,255,23 
4,234,136,16,251,173,48,192, 
164,255,234,200,192,16,144,2 
50,160,10,136,208,253.32,143 
,3,144,217,96 
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3220 FOR N = 1 TO 100: IF PEEK 

(49152! > 127 THEN 32S0 
3230 NEH 
3240 At = KIDt (AS, 2) + LEFTt ( 

At,li 
3250 B$ = RISHTt (B$,l) + LEFTt 

!Bt.39):X = PEEK (49152): IF 

X > 127 THEN 3280 
32tO fl = A 4 l; IF A = 16 THEN A = 

1 
3270 SOTD 3180 
3280 POKE 4?ls8,0: TEXT : HOKE : 

RETURN 
Word-wrap routine. 

3290 LT = LEN (TU: IF IT < 40 THEM 
PRINT T$: RETURN 



-BROADWAY - 



3300 FOR X ^ 40 TO 1 STEP - 1: IF 

HIi)t !Tt,){,l) = " " THEN 33 

20 
3310 NEXT : PRINT LEFT$ (Tt.S?! 

:T$ = MIDt (T$,40): BOTO 32 

90 
3320 PRINT LEFTt iTJ,)! - II: IF 

I = LT THEN RETURN 
3330 TJ = KIDt (TijX + 1): SOTO 

3290 
Walt for a keypress. 

3340 PRINT : HTAB 6: INVERSE : PRINT 
"PRESS ANY KEY TO CONTINUE": 
NORMAL 

3350 WAIT 49152, 12B: POKE 49168, 
O: RETURN 




SWAT 



TAKLIll For APPLE® BROADWAY 



LINES 



SWAT 

CODE LENGTH 



LINES 



SWAT 

CODE LENGTH 




2BiO DATA 32,1J2,J,!3'1,25A,165,2 
53, 133, 25!, 165, 254, 133, 252,1 
96,251, 240, 6, 70, 255, li.5, 255, 
lt,7, 173,48, 192, 165,253, 133, 
251,198,252,240,4,70,255,165 
,255,16,7,173,48,192,165 

2870 DaVa 254,133,252,32,143,3,1 
44,217,96,32,245,230,134,253 
,32,190,222,76,70,231,165,80 
,208,8,165,81,208,2,56,96,19 
8,81,198,80,24,96 

2880 BATH 0,0,173,43,192,136,208 
,5,206,160,3,240,9,202,208,2 
45,174,159,3,76,161,3,96 

Data for negotiable salaries. 

2890 DATA DIRECTOR, 15000,500,750 

0,250, 2500, 100, 10,1, .25 
2900 DATA "MALE STAR", 0,20000,0, 

10000,0,2500,10,1,-5 
2910 DATA "FEtlALE STAR", 0,14000, 

0,8000, 0,2000, 7,1,. 75 
2920 DATA "SET DESIGNER", 10000,3 

00, 5000, 200, 1500, 50, 3,1, .85 
2930 DATA "COSTUME DESIGNER", ICO 

00,300,5000,200,1500,50,2,1, 

.9 
2940 DATA "LIGHTING DESIGNER", 80 

00,300,4000,200,1000,50,1.5, 

1,.8 
2950 DATA "SOUND DESIGNER", 4000, 

200, 2000, 100, 750, 25, 2,1, .75 
2960 DATA CHOREOGRAPHER, 10000,30 

0,6000, 150, 2000, 75, 3,1, .75 
2970 DATA COMPOSER, 20000, 800, 100 

00,400,5000,150,8,1, .7 
2980 DATA LVRICIST, 15000,600,750 

0,300, 3000, 150, 7,1,. 8 
2990 DATA "BOOK AUTHOR", 15000, 60 

0,7500, 300, 3000, 150, 7,1, .75 
3000 DATA ARRAN6ER,8000,600,5000 

,400, 1500, 100,4, 1, .35 

Data for additional expenses. 



210 



3010 DATA SETS, 150000,200,75000, 

100,50000,75,2,1, .75 
3020 DATA LIGHTS, 3000,750, 1500, 5 

00, 1000,200,2,1, .75 
3030 DATA COSTUMES, 100000,2000,5 

0000, 1000, 15000,250. 2,1,. 75 
^^ ——BROADWAY 



3040 DATA SOUND, 3000, 1000,1500,5 

00, 1000, 200, 2,1,. 75 
3050 DATA PROPS, 40000, 1000,20000 

,500, 5000, 150, 1.75,1,. 9 

Check If the producer wishes to 
close the show. 

3060 PRINT : PRINT "DO YOU HANT 

TO CLOSE THE SHO«? "; 
3070 GET AN$: IF ANJ < > "Y" AND 

AN* < > "N" THEN 3070 
3080 IF AN$ = "Y" THEN POP : GOTO 

2700 
3090 RETURN 
3100 END 

Set up sound routine. 
3110 POKE 1013,76: POKE 1014,16; 

POKE 1015,3 
3120 FOR ZZ = 784 TO 949: READ N 

: POKE nX. NEU 
3130 RETURN 

Introduction. 

3140 A$ = "SOFTSIDE PRESENTS..,. B 
ROADWAY":Ct = A$:SS = "PRESS 
ANY KEY TO START" 
3150 LA = 20 - LEN !A$) / 2: FOR 

N = 1 TO la:a$ = "," + A$: next 

N: FOR N = 1 TO 40 - LEN (A 

$l:A* = A» + '.": NEXT N 
3160 LB = 20 - LEN (B$i / 2: FOR 

N = 1 TO LB:Bt = "." t 8$: NEH 

N: FOR N = 1 TO 40 - LEN iB 

t):B$ = Bt + "."; NEXT N 
GR ;a = 1 

COLOR= A: HLIN 14,17 AT 10: 
VLIN 10,14 AT 14: HLIN 14,1 

7 AT 14: VLIN 14,21 AT 17: HLIN 

0,17 AT 21 
HLIN 21,25 AT 10: VLIN 10,1 

4 AT 21: HLIN 21,25 AT 14: VLIN 

14,23 AT 25: HLIN 0,25 AT 23 
IF A = 1 THEN AA = AA + 1: IF 

AA = 1 THEN VX = 2: 30SUB 12 

o:vx = 

VTAB 21: PRINT A$: VTAB 23: 
PRINT B$;: IF MIDt (AS, LA + 

1, LEN (C$)) < > C$ THEN 32 

40 



3170 
3180 



3190 



3200 
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THE PRISONER . 




A Struggle For Information 

TP^^ The Prisoner is an intellectually challenging player versus 
^^^^^machine game inspired by the British television series of the same 
name. You are one of the inhabitants of the Island from whom infor- 
'mation is wanted. In particular, your captors wish to know why you 
'resigned your job and will go to quite extreme means to extract from you 
that one piece of information — which is in the form of a three digit resigna- 
tion code. Indeed, the entire Island is your own personal prison. Every 
building, path, person and supposed escape route appears to be part of a grand 
deception to throw you off your guard and reveal your private reasons for 
resigning. 

Basically, this is a game of the power of the individual against the forces of 
oppression. As The Prisoner, a person of conscience and a strong sense of in- 
dividuality, you are armed with this sense, your intelligence, your intuition and 
desperation. The Apple has, as does the Island itself, an arsenal of trickery, 
coercion, propaganda, lies, false clues, false escapes, ambiguity, inconsisten- 
cy, allegory and frustration. 

Both sides have a single objective that is simple in concept, but not in 
achievability. The player's goal is to escape from the Island; the computer's is 
to get the player to reveal his resignation code. Thus, this adventure is a strug- 
gle for information. The player possesses some very valuable (and perhaps 
dangerous) information that the authorities of the Island wish to uncover, 
while the player himself must in turn sift through what information the com- 
puter provides about the Island to discover the means for escape. It is also a 
struggle of the individual against society, for the authority sees the player's 
resignation and guarded reasons as rebellion and, through representations of 
various institutions of society, tries to convince the player that lack of 
cooperation and obedience to the will of the authority is disharmonious and 
against the best interests of the security, stability and preservation of the 
whole. 



Cellular Structure 

The Prisoner is actually an elaborate game system comprised of nearly 25 
different games and adventures taking place on the Island. The player need on- 
ly boot the disk to enter this exclusive resort, while the computer takes over the 
game management, error detection and control, and status files. The Island 
maintains tight control over the situation and knows how to handle its guests 
quite effectively. 

Playing time is extensive. If you want a quick shoot-em-up, look elsewhere. 
This is a psychological assault, and such things take time. The adventures on 
the Island will capture you for many sessions of play since escape from this in- 
tricate prison is far from easy. When you need a reprieve, you may suspend the 
game at any point and save the game status until you are ready to try again by 
simply typing CTRL-C. 

Stopping the game is a method the desperate may use to gain some clues on 
how to win the game, but at the cost of ten points for each clue given. The 
clues are given randomly and those with higher scores have a chance to get a 
better clue. A warning: Depending on your score and the random number 
generator you may get the same clue over and over, each time losing ten 
points. Even with a high score, the better clues may come up only rarely. Why 
should the keepers make things easier for the prisoners? 




From Edu-Ware Services, Inc., P.O. Box 22222, Agoura, CA 91301. 
System requirements: Apple® II, II + or lie with Applesoft, 48K and 
disk drive. Apple lie users make sure CAPS LOCK Is down. The 
Prisoner occupies the entire back side of this Issue's Apple DV. 

Anger. Indignation. You are finally fed up with your line of work, with The 
Company, with the whole system in general. And they were so damned imper- 
sonal about accepting your resignation, too! How do you vent your anger at a 
machine, blinking coldly at you? What does the machine care about the 
thoughts that have been building up in your conscience over the last few 
months? Coldly and efficiently it reduced them to a computer-digestible three- 
digit "resignation code." Yet, considering the context of your oratory, it was 
appropriate. 

Well, at last it is over. Your mind is calm, your conscience clear. Now you 
want only to get as far away from the Service and its repugnant secrets as 
possible. Where should you go for an escape? Paris is nice at this time of year. 
You've had some pleasurable assignments in Madrid. New York is always.... 

Drowsiness. Darkness. Drowsiness. Awake. What a sleep. Wait! Where are 
you? A glance out the window tells you that foul play has occurred. You have 
been abducted and imprisoned on "the Island," an isolated, self-contained 
community that is a bizarre perversion of society where sophisticated brain 
washing techniques, electronic surveillance devices, plots, counterplots, delu- 
sions, paradoxes and oppression abound. 

Here, you can trust no one and no thing. Prisoners and keepers are in- 
distinguishable, rules are vague and inconsistent, truth and falsehood are in- 
determinable. Even your own identity is at times in question. The only certain- 
ties are that you are the prisoner of someone known only as "the Caretaker for^ 
the Master," who seeks to know why you resigned and will go to any means ^ 
to obtain that information. Your one consolation is that they don't want 
to damage you. At least not permanently. 

You must escape, but clues are hard to come by and allies come 
even harder. Your tools are your intelligence, intuition and sense of ^(%] 
individuality. Will you manage to escape, or will you be broken, 
absorbed into the system, and forever remain The Prisoner? 
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The game has a liberal amount of visual stimulation. Over forty displays of 
text, low resolution, and high-resolution graphics, as well as sound effects, 
keep your attention and interest at a peak during even the most lengthy session 
of play. Many experiences and options are available. A generous helping of 
random events, play inputs and decisions, places, and adventures keep The 
Prisoner from being just another fixed-algorithm game. The Island is a com- 
plex environment, and you will not discover all its amenities even after many 
sessions. 

You must learn the rules as you play, because, just as in real life, the rules 
are not laid out beforehand, but must be discovered as you go along. In fact, 
rules are not even consistent on the Island — keys that perform particular 
functions in one part of the game may have totally different functions in 
another section. Remember that your keepers are always in control and that 
they deliberately keep things vague and inconsistent to manipulate and 
frustrate you. Keep alert, be persistent, and don't be afraid to experiment. 

Every decision is scored. The Island keeps you under constant surveillance 
and monitors your every movement. It increments or decrements your score 
based upon whether or not your actions are those of an individual. The more 
individuaUstic you are, the greater your score will be. This score is revealed on- 
ly upon winning, losing or suspending the game, and is closely hnked with 
your chances of escaping. Many doors are closed to you until your score 
reaches a high enough value. Since this score usually is invisible to you, weigh 
and verify your decisions to determine if they are in your own best interests. 
The authorities will give you no help. 

The challenge is to your mind. Success in the game requires reading between 
lines, logical deduction, developing new and creative patterns of thinking, 
making intuitive moves and detecting trickery. This is not an easy game to win, 
and every sub-game is a challenge in itself, requiring different mental 
disciplines. You will find yourself at times frustrated, confused, discouraged, 
puzzled, perhaps even angry. Don't give in! The Island authorities want you in 
this condition so as to absorb you into the complacent, nonthinking, 
nonresisting masses. A sense of humor and a refusal to give in make for a 
strong shield against the manipulative and coercive forces of the Island. 

Winning is both absolute and relative. The main object of the game is to 
escape from the Island. But for those of you who are numerically minded, or 
who have a tendency to reveal your resignation code too readily, the score pro- 
vided at the end of the game lets you judge your performance. 



A Note to Fans of the Series 

While this game was inspired by the Patrick McGoohan's "The Prisoner" 
series, it is not meant to be an adaptation of it. Fans may recognize many 
elements of the show, which were retained to preserve the spirit and message, 
but they may be disappointed that certain other elements are missing or changed. 
Though we are great fans of the series, we are also "individuals" with creative _ 
concepts of our own. 



Instructions 

The Prisoner is a complex game to win, but not to operate. The 
game is a complete turn-key system, requiring you to do nothing 
other than to insert the disk and boot it. From then on, the 
computer takes over the maintenance of the program 



THE PRISONER 
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However, the task of operating the game is entirely up to the player; hence, 
these expertly crafted instructions. Although many software purchasers refuse 
to believe this, accompanying documentation is as important as the program 
itself. You will be severely handicapped and frustrated without these instruc- 
tions. Read the opening section to get into the spirit of the game. Contrary to 
what many Orwellian authorities may wish you to think, ignorance is not 
strength. Only the most informed individual will be least duped and 
manipulated by the society. 

Always leave your Prisoner disk in the drive and keep the drive door closed. 
This is a disk-intensive game (it accesses the disk a lot) and should not be 
disturbed until the session is finished. Don't worry if you accidentally remove 
the disk or open the door during play, for the error handling routines are quite 
forgiving and will just groan at you the next time you access the disk until the 
situation is remedied. The game will not be disturbed; nevertheless, it is annoying. 

The game always begins with a brief representation of the prisoner's resigna- 
tion and display of his three digit resignation code, even if you are continuing a 
previously suspended game. The resignation code is the heart of the game — 
the reason you have been imprisoned on the Island. You must either memorize 
it or write it down. Forgetting the code will not aid you. The authorities are 
trying to get you to enter your resignation code into the computer, and you 
might be tricked into doing so — even if you don't know the correct sequence 
of numbers. Under no circumstances reveal this number, because you will lose 
the game automatically. When you start a new game, you receive 500 Island 
credit units to spend. 



The Castle 

Following the display of your resignation code is your "abduction" to the 
Island. You will wind up in the Castle at the start of every session and the end 
of every unsuccessful escape attempt. Your arrival in the Castle represents a 
new day or adventure on the Island. Since this is your first experience after be- 
ing captured we will give you this one bit of information: The Castle really is a 
maze, a prison within a prison from which to escape. 



The Island 

The Island has twenty different structures, each containing a different 
adventure or experience. Only four appear on the screen at any one time. Oc- 
casionally, you may see a gate to the outside world. At times you will discover 
that the buildings have been rearranged when you are sent back to the Castle. 
This disorientation is your penalty for escape. Nothing else is disturbed; this is 
frustrating enough. 



Losing 

The only way to lose is to reveal your resignation code deliberately or 
unintentionally. When you do so, the program resets the disk files to a new 
game status (your score is zero, you have 500 credits and your possessions are 
lost). You will receive your final score, and the game will end. No pardon is 
possible. 



Winning 

The only way to win the game is to escape (by the way, that may be escape 
literally, figuratively, physically or mentally) from the Island. And the way to 
escape is to.... Ah, but that would be telling. You may find one or several, or 
even no ways to escape; that is for you to discover and decide. As with losing, 
winning the game sets the disk files to a new game status so the next session has 
no record of the previously played game. 

When you do discover a method for escaping, please keep it a secret (unless 
they threaten to do bodily harm to themselves or you in order to find out, and 
even then they might regret it). You have had your fun; don't ruin it for 
others. If someone tells you a way, remember that it might not work if your 
score isn't high enough, and that plenty of demanding things are still on the 
Island to master and discover. 



Strategy 

Just as with any other escape attempt, doing well in the game requires 
developing a strategy that takes into account both your prison and your 
keepers. Following are some points to consider: 

• Keep pen and paper close at hand. You will have a number of objects and 
pieces of information to keep track of during the course of the game: 
buildings, credits, clues and the like. You must do all of your own bookkeep- 
ing. If this seems unneccesarily tedious, remember that the computer is not 
there to help you — it is your adversary. 

• Use your keyboard. Not every input into the program has a prompt. If the 
program appears to stop or "hang," probably it is waiting for you to type 
something in and perhaps even measuring your response time. If you get impa- 
tient, do not wait for the computer. Take the initiative and try nudging the 
keyboard. 

• A flashing cursor always indicates that the computer is waiting for you to 
type something. It may desire only a single keystroke response or several 
keystrokes followed by a RETURN. Be aware that sometimes the backspace 
key is disabled, and after an input reaches a certain length a RETURN is 
generated whether you pressed that key or not. Keep your eyes on the screen 
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and what you are typing. You will find that certain keys have a special func- 
tion at one point in the program, but may not behave the same way in another. 
Consistency is not one of the attributes of the Island. Be open to change. 
Remember that the only means of communicating with your computer is 
through the keyboard. When in doubt, type something, anything. However, 
desirable results cannot always be guaranteed. 

• Use your head. Few instructions are included within the program — and 
this is no accident. To get into the spirit of the game, you must place yourself 
into the prisoner's position, an uncertain pawn of imperceptible forces. When 
confronted with a problem, try different approaches, whether they be logical, 
intuitive, creative or desperate. Please do read the instructions that are 
presented, and then decide if you care to follow them. 

• Explore the Island thoroughly. If you enter a building or other location that 
you do not understand or find uninteresting, leave and discover one that you 
find more appealing. But do not make hasty evaluation. Some buildings have 
special features that you must discover through experiment or luck. Try 
visiting different locations at different times and don't be afraid to break the 
rules. 

• Don't let the game get to you. If you find yourself getting overly frustrated, 
stop the game for a while, and come back later with a fresh mind. It isn't meant 
to be played in one sitting. If you do find the authorities are beggining to 
rattle you, remember that that is exactly what they want. Keep your cool and 
sense of humor. 

• If you think the program isn't working, try again. What you may at first 
believe to be an error may not be the case. A trick might have been played on 
you; certain possessions must be gained or tasks performed to get something to 
work; or the computer may be waiting for you to press certain keys or make 
certain responses. Don't be too quick to assume an error, and remember that 
CTRL-C can get you out of any section of the program. 

• Above all, this is a game of psychology. While the Island is trying to psych 
you out, you must in turn try to psych out your keepers. From your knowledge 
of the Island, try to guess how its designers' minds work. Your one hope for 
escape is to second guess them. 



MAD 




SCIENTIST 



by Thomas Hanlln III 
Apple version by Fred Pence 

Mad Scientist Is an adventure program for any Apple® computer. 



Have you ever felt the urge to go adventuring, but were foiled by a severe 
deficiency of giants, dragons and mad scientists in your neighborhood? Well, 
here's your chance! 

Your task is to enter the mad scientist's haunted house, rescue the fiend's 
beautiful daughter, and get out of the house before it's blown sky-high (after 
about 225 turns). It won't be easy! You cannot enter the daughter's room until 
a certain event has occurred. Secret passageways bar your path. Monsters pop 
up at inopportune moments and try to kill you, as is their custom. The direc- 
tional compass in the lower corners of the screen won't show you everything! 

You accomplish your tasks in this game by using one- or two-word com- 
mands such as "GO NORTH" and "SCORE". Finding these will be part of 
the fun. Let it be a challenge to you! 

For further general information on adventure games, see the SoftSide 
Adventure Series on page 32. 
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Variables 



A(*,*): Directions possible from 
room. 

AR(*): Rooms with special hap- 
penings. 

A$(*): Room descriptions. 
BU: Fence on (1), Off (-1). 
DA: Daughter flag (1 -after gotten). 
DD: Direction counter for valid 
directions. 

OD$: Directions strings. 
FLAG: Front door flag. 
F2: Electric fence message diplayed 
flag. 

F9: Escape flag (Player has 
daughter and fence is off). 
GH$(*): Monster identifier. 
OS: Monster key (0-Skeleton, 
1-Ghost). 

LF: Weapon flag (1-In room, 0-In 
possession). 

M(*): Room direction available 
from secret passage. 



MO(*): New room accessible from 
secret passage. 

MO$: Object in move object. 
MO$(*): Array of movable ob- 
jects. 

MV: Number of moves. 
NR: Prospective next room or 
special message. 

OE: Return to driveway without 
daughter flag. 

OL: Room for repositioning player 
when running from monster. 
RM: Present room. 
RN: Number of moves remaining. 
SG$(*): Monster killed messages. 
SH: Number of uses of the 
weapon left. 

WAS: First letter of direction in 
"GO" command. 
WHS: Input string. 
X, Y: Loop variables. 



S3 3S SS SS SS SS 53 SS SS SS 33 
33 33 

33 ApplsBoU Bfl3IC 33 

S3 'Mad Scientist' 35 

33 Author: ThoniaB Hanlin III 35 
33 TrarisIatEr: Fred Pence 35 
SS Copyright (c) 1933 SS 
SS SoftSide Publications, Inc SS 
33 SS 

S3 SS SS 33 S3 33 SS 33 SS 35 33 

If you don't wish to type this program, It 
Is available on Issue #44 SoftSide DV. 

Initializations. 

10 DIM M0$(64),«0(64),A*(64>,A(6 
4,6), AR{i4), 11(20), Hti42) 



20 TDJ = "2 6IZK WLLI LKVNH FK YV 
HVZGS BLFI UVVS! BLF'IV UZDO 
RMT WLDtl Z )iSF6V.':FLAG = T. 
0D$ = 'LKVH HLLr:AR(4) = 1: 
AR(a) = !:flR(12) = l:fiR(14) = 
1 

30 BHKl) = "SSV TSLHG":6H$(0) = 
"LOW yLNB" 

40 HOME : VTAB 10: PRINT " 

MAD SCIENTIST": 
PRINT : PRINT " BY 
THONfiS HANLIN HI": PRINT : PRINT 

: PRINT : PRINT : print 

50 PRINT " (APPLESOFT TRfl 
NSLATION :": PRINT " A 
NN-CftROL AND FRED PENCE)" 



hO EF$ = "BLF MLM'G DZHS GL TL SS 
ZB DZB - SSVIV'H Z VOVKGIRUR 
VN UVHXV" 

70 DD« = "MVHDFH" 

80 RN = 150 t 150 t RND (1):H(1) 

= 6:«(n) = 6:11(15) = v.nm 

(15) = °YLLPl(ZHy":NI1* = "MVE 
VI NRHW; R6H Z ILZW NZK LU G 
IZMHBD- EIt1RZ.":LF = l:HO$( 
1) = "GZY0V:M0(1) = 24 

90 11(18) = 3:110(15) = 19 

100 FOR )l = 1 TO il: REftD A$(K): 
FOR V = 1 TO h: READ fl!X,y) 
: NEXT Y,X:RN = 51:H0t!l8) = 
"K2RMGR(1T":I10(18) - 20:H0*(1 
1) = "X2IKVG":I10(11) = 31:AR 
(18) = l:AR(29) = l:AR(35) = 
l:AR(4) = 1 

110 FOR X = I TO 42: READ Ht(K): 
NEXT X 

120 VTAB 22: HTflB 12: INPUT "INS 



TRUCTIONS 



;«Ht: IF LEFT* 



mi, I) = "Y" THEN 60SUB 15 
60 

130 SG$(1) = "AAftAZKI GSV TSLHG 
NRHZKKV2IH RM 2 XOLFHLU HGVZ 
N.':S6$(0i = "AAALIXS' GSV 
HPVGOVGLM GFIMH RM6L Z KR 
OV LU ZHSVH.'':BU = 1 

Draw direction compasses. 

140 HOME : VTAB 1: HTAB 3: PRINT 
"-': VTAB 2: HTAB 1: PRINT " 
- + -": VTAB 3: HTAB 3: PRINT 
"-": VTAB l: HTAB 38: PRINT 
"-■: VTAB 2: HTAB 38: PRINT 
"+": VTAB 3: HTflB 38; PRINT 

150 FDR X = 1 TO i: IF A(RI1,X) > 

THEN ON X GOTO 170,180,19 

0,200,210,220 
160 GOTO 230 
170 VTAB l: HTAB 3: PRINT "N";: GOTO 

230 
180 VTAB 2: HTAB 5: PRINT "E"i: GOTO 

230 
190 VTAB 3; HTAB 3: PRINT "S"i: GOTO 

230 
200 VTAB 2: HTAB 1: PRINT "M";: GOTO 

230 

^^ MAD 
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210 VTAB l: HTAB 38: PRINT "U";; 
GOTO 230 

220 VTAB 3: HTAB 38: PRINT "D"! 

230 NEXT 

240 VTAB 2: HTAB 10: PRINT °<-D 
IRECTIONS POSSIBLE-)': VTAB 
4: HTAB l: PRINT " 



Display current room description. 

250 VTAB 5: HTAB 1:P» = A$(RH): GOSUB 
1530: PRINT : IF R« = 26 THEN 
PRINT : HTAB 5: FLASH :P$ = 
M$II): GOSUB 1530: PRINT : NORMAL 
IF RM = 12 AND LP = 1 THEN FOR 
X = 2 TO 3:Pt = M$!X): GOSUB 
1530: PRINT : NEXT 
IF DA = AND RM = 29 THEN P 
* = Mt(4): GOSUB 1530 
IF RM = 4 AND DA = I AND BU = 
1 THEN ?t = Mt(5): GOSUB 153 


IF RM = 14 THEN NR = 1: GOTO 
1240 

IF RM = 8 AND FLAG = 1 THEN 
P» = «$(6): GOSUB I530:FLAG = 
0:0E = 1 

IF RM = 4 AND F2 = THEN FOR 
X = 7 TO 9:P$ = M${X): GOSUB 
1530: PRINT :F2 = 1: NEXT X 
IF RM = 35 THEN FOR X = 1 TO 
1200: NEXT X: GOTO 1270 
IF RM = 18 THEN 1460 
IF RM = 4 AND F9 = 1 THEN Pt 
= MtdO): GOSUB 1530 

Get player's command and execute 

"GO" commands. 



260 



270 



280 



290 



300 



310 



320 

330 
340 



350 PRINT : INPUT "WHAT WILL YQU 
DO ? '!WHt:Pt = mr. GOSUB 

1540:WH$ = Pit: IF LEFTJ lU 

Ht,3) = "TL " AND LEN mi) 
) 3 THEN WA$ = MID* (WH$,4 

,1): GOTO 380 
360 IF LEN (WH$) > 1 THEN 570 
370 WAJ = HH$ 
380 OD = O: FOR X = 1 TO 6: IF IdA 

J = MID$ (DD$,X.l) THEN NR = 

A(RI1,X):DD = 1 
390 NEXT X: IF DD = 1 THEN 420 



SCIENTIST - 
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400 


MAD SC 

PRINT "SAY WHAT ? ! ? !" 


lENTIST . 

620 IF RH = 29 AND MHt = "TVG MZ 


410 


SOTO 1240 




FTSGVr THEN P$ = H$(19): 60SUB 


420 HV = MV + l: IF HV < = RN THEN 




1530 




450 


630 


GOTO 1240 


430 


HOHE : VTAB 10: FOR )(= 11 TO 


640 


IF LEFT* («Ht,5) = "NLEV " THEN 




14:PJ = M${y.): GDSUB 1530: PRINT 




IF NOt(RN) = "" THEN PRINT 




: NEH : VTAB 23 




"THERE'S NOTHING HERE YOU CA 


440 


END 




N MOVE. TRY SOMETHING ELSE 


450 


IF NR > - 1 THEN 520 




.": GOTO 1240 


440 


IF NR = - 1 THEN P$ = EF«: GOSUE 


650 


IF WH$ = "TVG NZK" OR WH* = 




1530: SOTO 1240 




"IVZW NZK" OR «H$ = "VCZNRHV 


470 


IF NR = - 2 THEN PRINT "YO 




NZK" OR WHt = "OLLP NZK" THEN 




U CAN'T 60 THAT HAY.": GOTO 




?% = m%: 6QSUB 1530: GOTO 1 




1240 




240 


430 


IF NR = - 3 THEN PRINT "TH 


660 


IF LEFTt (MH$,4) = "NLEV" AND 




E DOOR IS SHUT.": SOTO 1240 




LEN !WH$) < 6 THEN PRINT " 


490 


IF NR = - 4 THEN PRINT "TH 




HOVE WHAT' ";: SOTO 1240 




E DOOR IS LOCKED.": GOTO 124 


670 


IF LEFT* (WHt, 4) < > "NLEV 









" THEN 720 


500 


IF NR = - 5 THEN PRINT "DO 


6B0 


H0$ = RISHT$ m%, LEN (WHt) 




N'T BE A CHICKEN! THE GATE 




- 5!: IF M0$ = HO$(RH) THEN 




IS TO THE": PRINT "SOUTH.": GOTO 




A(RH,M(RM)) = RO(R«): PRINT 




1240 




: PRINT "THE "!:Pt = M0$: 60SUB 


510 


IF NR = - 6 THEN PRINT "YO 




1530: PRINT " IS MOVED. ":P$ = 




U'RE OUT OF YOUR MIND.": GOTO 




Mt{20): GOSUB 1530: GOTO 700 




1240 


690 


PRINT "1 CAN'T HOVE THE ";;P 


520 


IF INT (31 » RND (D) = 30 




i = M0$: eosuB 1530: print " 




GOTO I2S0 




.",•: GOTO 1240 


530 


IF RM = 17 AND 10 ♦ RND (11 


700 


IF RM = 1 THEN Atd) = "BLF' 




< 7 THEN HONE : GOTO 140 




IV RM Z ILLN DRGS XLON TIVVH 


540 


RH = NR 




UOZNVH WZMXRMT ZILFMN BLF." 


550 


IF Rtl = 4 AND DA = 1 AND BU = 




: GOTO 1240 




- 1 THEN A!4,l} = 35:F9 = 1 


710 


GOTO 1240 


560 


GOTO 140 


720 


IF LEFT* (WHt, 5) = "HXLIV" THEN 


Interpret and execute commands 




PRINT "YOU'VE GONE "iMV!" M 


other than "GO" commands. 




OVES so FAR.": GOTO 1240 


570 


IF RM = 10 AND mA = "UORK 


730 


IF m% = "TVG OzHVI" OR klHt 




HDRGXS" OR m$ = "K'FHS HDRGX 




= "TVG TFM") AND RM = 12 AND 




S" OR WH$ = "GFIM HDR6XS") THEN 




LF = 1 THEN LF = 0:P$ = Mt[2 




BU = - BU: GOTO 1460 




1): BOSUB 1530:SH0TS = 5: GOTO 


580 


IF WHt = "OLLP" THEN 140 




1240 


590 


IF WH$ = "JFRG" THEN HOHE : 


740 


IF m% -- "TVG OZHVI" AND LF = 




VTAB 10: FOR X = 15 TO 17:P 




THEN PRINT "YOU'VE ALREAD 




$ = mn): gosub 1530: print 




V GOT IT, SILLY!": GOTO 1240 




: NEXT ; VTAB 23: END 


750 


IF SH > AND LEN (WHt) > 5 


iOO 


IF RH < > 29 THEN 640 




AND LEFT$ iWH$,5) = "HSLLG 


610 


IF RM = 29 AND DA = AND HH 




" AND LF = THEN Pt = MJ(22 




i - "TVG HZFTS6VI" THEN F$ = 




): GDSUB 1530:SH = SH - 1: PRINT 




M$(181: BOSUB 1530: DA = 1: GOTO 




"YOU HAVE ■;SHi":P$=H$(23l:6 




1240 




OSUB 6100:6010 610 



760 



770 



780 



790 



300 



810 



330 



840 



850 



860 



IF LEFT$ (WHt,5) = "HSLLS" AND 
LF = AND SHOTS > THEN P$ 

= HttlM): GOSUB 1530: GOTO 
1240 

IF LEFT* (NHJ,5J = "HSLLS" AND 
LF = THEN PJ = «$l2b): BOSUB 
1530: GOTO 1240 

IF LEFT$ (WH$,5) = "HSLL6" THEN 
P$ = H$(26): GOSUB 1530: GOTO 
1240 

IF WHI = SM* AND RM = 16 THEN 
PJi = NH»: BOSUB 1530: GOTO 1 
240 

IF RI1 = 29 AND DA = 1 THEN 1 
40 

IF LEFTt 1HH$,3) = "IFM" THEN 
Pt = Fl$(27): GOSUB 1530: GOTO 
1240 

IF OE = 1 AND DA = AND RM = 
4 THEN PRINT "HEV! YOU CAN 
'T LEAVE WITHOUT THE 8IRL,": 

PRINT "GO BACK'": GOTO 1240 
IF RH = 38 AND WHS = 0D$ THEN 
A(38,3) = B:FLA6 = 1: PRINT 
"DOOR OPENED."; GOTO 1240 
IF RM = B AND (WHt = 0D$ OR 
WHt = "FMOLXP HLLI") THEN PRINT 
"THE DOOR WON'T OPEN.": GOTO 



B70 



IF RM = 38 AND HH$ = "FMOLXP 
WLLI" THEN PRINT "IT ISN'T 
LOCKED.": GOTO 1240 
IF I LEFTt (WH$,7) = "VCZNRM 
V" OR LEFTS (WHt, 4) = "OLLP 
"/ AND (R« = 1 OR RM = 11 OR 
RH = 15 OR RM = 18) THEN P$ = 
Mt{29): BOSUB 1530: SOTO 124 


IF LEFT* (WH*,3) = "TVG" AND 
(RM = 1 OR RM = 15 OR RN = 1 
1 OR RH = 13) THEN P$ = Mt(2 
9): GOSUB 1530: PRINT :P$ = 
M»(30): GOSUB 1530: GOTO 124 


IF WHJ = "KFDO IRMT" OR WHJ = 
"TIZY IRMT" AND RM = 22 THEN 
P$ = TD$: GOSUB 1530: NR = 13 
: GOTO 1240 
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= "UORK HDRGXS" THEN 
"WHAT SmTCH?": BOTO 



890 IF WHt ^ 
PRINT 
1240 
900 IF WHt = "KFOO IRMT" THEN PRINT 

"WHAT RING?": GOTO 1240 
910 IF LEFTt (WHt, 3) = "TVG" THEN 
PRINT "VDU CAN'T GET THE";: 
Pt - RIGHTf (WHt, LEN (WHt) 
- 3): GOSUB 1530: PRINT "I" 
: GOTO 1240 
920 PRINT '1 DON'T KNOW HOW!": GOTO 
1240 

Room descriptions and direction 
data. 

930 



DATA "BLF'IV OBRHT LM 2 GZrO 

y. aow rivvM uoznvh wzh 

XV 21LFMW BLF.",-2,-2,-2,-2, 
-2, -2, "BLF'IV HFIILFMWVW YB 
SVMYZHV, ZXLHRGV ZHW YVOOZ 
WLMMZ. 6ERH NFHG YV ZM SVIY 
TZIWyM.",-l,3,-2,-l,-2,-2 
940 DATA "6SRH RH 6SV UILMG OZDN 
. GSV DRMHLDH LU 6SV SLFHV 
ZKKVZI GL YV DZGXSRMT BLF.", 
-1,4,-2,2,-2,-2, "BLF'IV LM Z 
OLHT, XLYYOVW WIREVDZB. ",-1 
,5,38,3,-2,-2 
950 DATA "6SRH RH Z TI2EVBZIW. G 
SVIV ZIV GLNY- HGLMVH OBR 
MT ZYLFG, ZMW RM GSV NRWWOV 
LU6SV K0L6 GSVIV RH Z NZFHLO 
VFN.",-l,-l,-2,4,-2,-2 
9i0 DATA "BSRH RH GSV ORERMT ILL 
N. Z SFN2M HPFOO SZMTH LEVI 
GSV URIVKOZXV, DSRXS RH GSV 
LMOB HLFIXV LU ROOFNRM26RL 
H RM GSV ILLN. ",-2,7, 11,-2, - 
2,-2 
970 DATA "LEVIHGFUUVW XSZRIH ZIV 
HXZGGVIVW ZILFMW GSV ILLt^. 
GSRH NFHG YV GSV KZIOLI.",- 
i,a, ..,0, i, i. 
980 DATA "BLF'IV QFH6 RMHRWV GSV 
WLLIDZB.",-4,9,-2,7,-2,-2," 
BLF'IV Z6 GSV YLG8LN LU Z OL 
MT HGZRIDZB.",-2,-2,-2,8,10, 
-2, "BLF' IV LM 2 OZMWRHT YVSD 
VVM UOLLIH. ",-2,-2,-2,-2,22, 
9 
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1070 


DATA "BLF' IV ZG GSV GLK LU 


790 


DATA "GSVIV'H Z V'VZFSRUFO KV 
IHRZM XZIKVB XLEVIRMT G 
SV UOLLI im 1 QZITV BZKVHGI 




Z GLUT HGZRHZHV. Z ylLHAV 
I RUT RH VNYVWWVK RM GSV UDLL 




B RH L« GSV DVHG DZ00.",Z.,12 




I MVCG GL BLFI UVV6.",-2,-2 




,15,-2,-2,-2 




,23,30,-2,10 






1 030 


DATA "BLF'IV ZG GSV ULLG LU 


1000 


DATA "BLF ZIV RH 63V DUHS V 








NW LU ZM VMLINLFH OZYLIZBLI 




Z HGZRIDZB.",22,-2,-2,-2,36 




B. VVZPVIH LU YFVVOB, YFVyO 




,-2,"GSRH RH GSV YVOUIB. Z 




RHTORJFRWH ZMW IV6LIGH HFIIL 




XZIKVG LU YZGH KORMTH GL G 




FMW BLF. ",-2, 13, -2, 11,-2, -2 




SV XVRORMT." 


1010 


DATA "BLF ZIV RH GSV NRHWOV 


1090 


DATA 36, -2,21, 25, -2,-2, "Z 








KOZKZIW LM GSV HLI6H DZQO K 




LU Z OZVLIZGLIB. Z SFTV JL 




ILiiOZRNH GSRH GL VV 'ESV V 




MGIZKGRLM ORBS I'ORMPRMT ORTS 








GH im DSRIORMT GZKV IVVOH G 




ZG ILLN'. ",41, 24, -2, 26, -2, -2 
,"NLLH ILLN. 2 HRTM IVZlilH: 




ZPVH n in VM- GRIV DZOO. R 




",-2,25,-2,61,-2,-2 




GSRMP RGH HLNV PRMW LU H 




J i.^i.^J I-fUX^ k) t. 






1100 


DATA 'BLF URHN BLFIHVOU ZG 




LKSRHGRXZGVa SR-UR HBHGVN.", 








-2,14,17,12,-2,-2 




GSV ULLG LU Z H6ZRnZHV.",29 


1020 


DATA "LS LS' 6SV NZW HXRVH 




,-i,-2,49, j;, -2 






1110 


DATA "BLF URMM BLFIHVOU RM 




GRHG RH SVIV (HVIEVH B 




GSV ZLNKFGVI ILLN. ZNLMT LG 




LF IRTSB ULI HMLLKRHT ZILFMW 




SV! GSRMTH, GSRH ILLN XLHGZR 




SRH OZYLIZBLIB). SV A2KH 




MH Z 4aP ZKKQV RR KOFH, DRG 




BLF ZMW XZIIRVH BLF L 








UU.", -2, -2,-2,13,-2,-2 




S 2 HRHP «IREVH,QLBHGRXPH, I 
IZKSRXH GZYOVG, ORTSG KVH 


1030 


DATA "GSVIV'H Z YLLPXZHV ZS 
eSV HLF6S VMM LU GSV ILLN. 




ZMW Z NLWVN. L.P., JFRG WI 
LLORMT ZKW NLEV ZOLMT.' 




",ll,-2,-2,-2,50,-2,"ZSZi 6 


1120 


DATA 30,-2,44,-2,-2,-2, "BLF 




SVIV'H Z NZK RH GSV NRUWOV L 




ZIV RH Z VVWILLN. ■,-2,30,27 




U GSVILLN.',-2,lZ,-2,-2,-2,- 




,52, -2,-2, "BLF' IV RM Z HFH I 








LLN.", -2, 22, 28, -2, -2, -2, "BLF 


1040 


DATA "GSV UOLLI RH aLEVIVW 




'IV RM (SRGSVIGL-HV;(IVG) kZH 




ORGS HORKKVIB TLL' RG NZB r 




HZTVDZB.",33,-2,-2,-2,ll,-2, 




V SZIW GL TVG LFG LU SVIV.", 




"BLF URMW BLFIHVOU RM Z WZIP 




13,-2,-2,16, -2, -2. "GSVIV'H Z 




ILLN.', -2,39, -2, 33,-2,-2 




OZITV KZRMGRHr LH GSV HLF6S 


1130 


DATA "BLF URMW BLFIHVOU RM 




DZOO. MVC6 GL GSV KZRHGR 




Z HZIP ILLN.", -2,32, 31, -2,-2 




NT RH 2 HDRGXS ORGS ZM O.V.W 




1 ^ 




. IVZWLFG ZYLEV RB.",-2,-2,- 


1140 


DATA "GSRH DLLFH ORFV GSV V 




2,-2,-2,-2 




m LU GSV KZHHZTV- DZB. 2 U 


1050 


DATA "BLF' IV R« 1 OLHT, MZI 




ZRMG ORTSG UROGVIH RH UILN 




F SZOODZB.", 15, 42,-2, -2,-2,- 




ZyLEV.",-2,-2,40,-2,5,-2, 




2 




"BLF'EV NZWV RGI MRU'QLY!" 


lOdO 


DATA 'BLF'EV TLHV WLDH 1 HZ 




,-2,-2,-2,-2,-2,-2, "BLF 2IV 




IP SZOO.", -2,-2,-2, 43, -2,-2, 




ZG GSV SVZW LU Z H6ZRIDZB.", 




"BLF' IV LM Z nVZPRMT rZOXLH 




-2,-2,24,-2,-2,23 




B LEVIOLLPRNTGSV TIZEVBZIW. 


1150 


DATA "BLF'IV ZG GSV GLK LU 




HlftP JSLHB-DRPV NRH6H HDR 




GSV HGZRIH. ',-2,-2,26,-2,-2, 




ID ZILFMW GSV TIZEVHGLMVH.". 




27, "BLF" IV ZG GSV VHGIZHKV." 




24,-2,-2,64,-2,-2 




,4,-2,-3,-2,-2,-2 



1140 DATA "GSRH ILLN RH WZIP. B 
LF H6FNVDV LEVI ZM LYSVKS RH 
GSV NRWWOV LU GSV ILLN. ",-2 
,40,-2,32,-2,-2,"BLF'rv' RM I 

wzip ILLN. R6 imniw 

HORTSBOE ORTSGVW GL GSV MLI 
BS. ",34,-2,-2,39,-2,-2 
1170 DATft "GSV ILLN IVVPH LU RMJ 

ymv. BSviv'H z kvmgztizn 

VNTIZEVW LM 6SU UOLLI, 2f1W 

DVRIW URTFIVH ZIV WRMGVW 

LH GSV DZ0DH.",-2,-2,25.-2, 

1180 DATA "GSV VOLLWHSLG VBVH LU 

I KZRMGfiMT ZVLEV GSV URIVK 

OZXV HVVN GL VV ULOOLBRHT BL 

F. ",-2, 43, -2, 19, 57, -2, "Z YOZ 

XP XZS DZOPH HVHZGVOB ZHLHH 

BLFI KZGS." 

1190 DATA -2,20,-2,42,-2,-2, "GSR 

H RH Z HFKKOB ILLN. Q21H LU 

XSVNR- XZOH, rOZHH, ZHW IF 

YYVl 6FVRM1, VLCVH LUIVHRH6L 

IH, ):ZI1H LU GLZHH6LL0 HLFK 2 

MW YZOVH LU YZG UFI ORMV 6 

SV DZOOH. ",28,-2,45,-2.-2,-2 

1200 DATA "GSRH RH ZNLGSVI HFKKO 

B ILLN. rOZMP NRHPVGGVH 

, E2IRLFH GLLOH ZMW Z DLQU S 

RWVZWLIM GSV DZOOH. KRXPOVW 

KVLKOV KRVXVH ZIV RM S2IH Y 

B BSV ait1VI.",44,55,-2,44,- 

1210 DATA "GSRH ILLNH RH IIFOO LU 

XOLXPH ZHW DZGXSVHLU ZOO PR 

MWH - ZOO IFMMRtlT YZXPDZIWH. 

",-2,45,-2,47,-2,-2,"H6IZHTV 

GRXPRMT HLRHVH XZM yV SVZIW 

6L SSV V2HE. ",48,46,56,-2, 

*■? '• 

1220 DATA "GSVIV'H Z SLOV RN SSV 

HLFGSDVHG XLIHVI LU GSV UO 

LLI'",4?,53,47,-2,-2,50,"NFU 

UOVW HMLIRNT MLRHVH ZIV XLNR 

HT UILN GSV VZHG.',-2,-2,43 



1230 DATA "BLF'IV KIVXZIRLFHOB K 
VaSVW Z8LK ; YLLP-J2HV.°,-2 
,-2,-2, -2,48, 15,"BLF'1V Z6 S 
SV TZeV LU GSV SLFHV.",-5,-5 
,4,-5,-2,-2 

Update room and check for player 

visiting special room. 

1240 60SUB 1500: IF NR > THEN 
RH = NR 

1250 IF RM = 1 THEN A!24,l) = 37 

1260 GOTO 140 

Winning game routine. 

1270 HOME : VTAB 8: PRINT " 

YOU'VE WON THE GAME.": PRINT 

: PRINT : PRINT : print " 

C0N6RATULATI0 

N S!": VTftB 22: PRINT " 

IT TOOK YOU "MV" MOVES. 

": END 
Monster appearances. 
1280 n = M$(31): 60SUB 1530 
1290 6S = l: IF RND (1) < .5 THEN 

P» = Mt(32): BOSUB 1530: GOTO 

1310 
1300 PI = HJ(33) 



60SUB I530:GS = 







-MAD 



1310 P$ = M$i34): 60SUB 1530: PRINT 
;P» = MJ(35): 60SUB 1530: PRINT 
: PRINT "WHAT WILL YOU DO";: 
INPUT WHJ:Pt = WHJ: BOSUB 1 
540: MH$ = Pli 

1320 IF ((WH$ = "HSLLB TSLHG" AND 
BS = 1! OR {WHJ = "HSLLG HPV 
OVGLH" AND GS = 0)1 AND LF = 
AND SHOTS < 1 THEN P$ = M$ 
(36): GOSUB 1530: SOTO 1240 

1330 IF LEFTt (WH$,3) = "IFM" THEN 
Pt = Ml 137): GOSUB 1530:P$ = 
GHtIGS): GOSUB 1530:P$ = H$( 
38): GOSUB 1530: PRINT :P1 = 
M$i39): GOSUB 1530: PRINT :P 
{ = Mt(40): GOSUB 1530: PRINT 
:GS = O: GOTO 1360 

1340 IF KtfHJ = "HSLLG TSLHG" AND 
GS = 1) OR (WHJ = "HSLLG HPV 
OVGLM" AND GS = 0)) AND LF = 
THEN SH = SH - 1:P$ = S6$( 
GS): BOSUB 1530: PRINT " YOU 
HAVE ";SH!:P$ = MJ(23): GOSUB 
1530:BS = O: goto 1240 
SCIENTIST 
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1350 P$ = 6H$iSS): 60SUB 1530: FOR 
X = 41 TD 42:P« = NJ(!(): 60SUB 
1530: PRINT : NEXT X: VTAB 2 
3: END 

Place player in a random location 
when running from a monster. 

1360 OL = m 

1370 RM = INT (44 * RND ill + 1 
): IF R« = OL OR (RM > 1 AND 
RN < i) OR RH = 35 OR RH = 2 
9 OR RM = 38 OR RM = 12 OR R 
M = 18 OR RM = 51 THEN 1370 

New room update. 

1330 NR = RM: 60T0 1240 

Additional room description and 
direction data. 

1390 DftTA 'BLE'EV VM6VIVW 2 VZGS 
ILLN. 2 QLHV VZB SZMTH UlL 
N BSV XFI6ZRH IL«. ",-2,29,-2 
, -3,-2,-2, "DSZS Z NZXZYIV TZ 
NV ILLN. R6 RH ORSVI- ZOOS 
HGU'DH ORBS RNKOVNVMGH UILN 
6SFNV- HXIVDH 6L ZM 'RILN NZ 
RWVM'.",-2,-2,-2,48,-2,-2 

1400 DATA "Z KLLO (f) LU VIZXPRH 
S DZ6VI XLEVIH NlHGLU 6SV IL 
LN. Z KZRI LU YVZWB VBVH ZM 
M ZVQFMG HMI.FG ZIV ERHRrOV Q 
FH6 ZvlEV GSy DZ6VI.",-6,-2 
,55, -2, -2, -6, "63V ILLN HNWO 
H H6IZMTV0B HDZNKB. ",54,-2,5 
9,45,-2,-2 

1410 DATA "GSV UOLLI, DZOOH, ZMW 

X'.'RORMT LU 6SRH ILLN ZIV 

XLE'JIVH DRGS NRIILIH. ',47,57 

,-2,-2,-2,-2,"HVEVIZD VLZIWH 

DRV ZILFMH Z OZITV SLOV RM 

GSV UOLLI. ",-2,58,-2,54,-2, 

42 

1420 DATA "H6ZRIH XLRO Fi; UILN 6 
SV XLIMVI LU GSV ILLN. ",-2 
,59,-2,57,64,-2 

1430 DATA "LWN, NFWWB GI2XPH OVZ 
W MLI63. ",55,-2,-2,58,-2,-2, 
"BSV BZIH RH ERHPraV UZI YVO 
LD 8SILFTS GSV MLI6S DRMWL 
D. ',-2,-2,41, -2,-2,-2 



MAD SCIENTIST — 

1440 DATA 



THEN PRINT » FEN 



PRINT : PRINT 



IRTTORMT SVZK ZKKVZ 
IH RH BSV XVHGVI LUGSV ILLN 
ZMhl HOLDOB UZWVH LFG ZH BLF 
DZGXS. ",60,26,62,-2,-2,-2 
1450 DATA "Z TL2S HPFOO RH MZROV 
W LEVI BSV MLISS «LLI.",61 
,63, -2, -2, -2, -2, "GSV UOLLI R 
H XLEVIVW DRGS Z KVLKOV-SZRI 
IFT.",-2,64,-2,62,-2,-2,"Z 
HKRIZO HG2RIXZHV DRMWH SLDM 
RMGL 6SV SLFHV. ",-2,21,-2,6 

Electric fence status sign display 
routine. 

1440 PRINT : HTAB 14: INVERSE : IF 

BU > THEN PRINT " FENCE 

N "i 
1470 IF BU 

CE OFF '; 
1480 NORMAL : PRINT 
1490 GOTO 350 

Pause routine. 

1500 VTAB 24: HTAB 13: INVERSE : 
PRINT "HIT ANY KEY ";: NORMAL 

1510 IF PEEK ( - 14384) < 128 THEN 
1510 

1520 POKE - 16368,0: RETURN 

Message decoding routine. 

1530 FOR P = 1 TO LEN (P»):I1 = 
ASC ( MID$ (P$,P,1)): PRINT 
CHR$ ( ABS ((155 ♦ (II > 64 
)> - 11));: NEXT : RETURN 

Message encoding routine. 

1540 IF LEN (PI) = THEN GOTO 
350 

1550 Fl» = •": FOR J = 1 TO LEN 
(P*):ll = ASC ( MID* (P»,J, 
1)):P1$ = PIJ + CHRJ ( ABS 
(!155 ♦ (11 > 64)) - ID); NEXT 
: RETURN 

Instructions. 

1560 HOME : VTAB 5: PRINT " !T 
IS YOUR MISSION TO RESCUE T 
HE MAD": PRINT "SCIENTIST'S 
BEAUTIFUL DAUGHTER FROM HIS" 
: PRINT "HAUNTED MANSION. T 
HERE ARE MANY HIDDEN" 



1570 PRINT "FASSHfiEHftrS (OF COUR 
SE') WHICH MAY BE": PRINT "F 
DUND ALL OVER THE HOUSE. ALS 
HIDDEN" 
OTHER KAiS. " 

1600 PRIHI : PRINT " TKO HORD 
CDHMANDS SUCH AS 'GET DOG* 
OR 'MOVE ROCK' GENERALLI ARE 
RECOBNIZEB." 

1610 GOSUB 1500: HOME : VTAB 6 

1620 PRINT ■ THE TOP CORNERS 
F THE SCREEN GIVE": PRINT 'Y 
OU THE OBVIOUS DIRECTIONS YO 
U CAN MOVE.";; PRINT "(USE ' 
GO SOUTH' OR JUST 'S'.i HID 
DEN": PRINT "PASSAfiENAYS ARE 
NOT SHOWN, BUT YOUR" 

1630 PRINT "INGENUITY SHOULD HEL 
P YOU. ■ 

1640 PRINT : PRINT " 'LOOK' III 

LL RESTORE THE DIRECTION": PRINT 
"COMPASSES FOR VOU IF THEY A 
RE NOT ON": PRINT "THE SCREE 
N," 

1650 GOSUB 1500: HONE : '.'TAB 7 

1660 PR.INT : PRINI " 'SCORE' 1 
ELLS YOU THE NUMBER OF": PRINT 
"MOVES YOU HAVE USED (YOU HA 
VE ABOUT 225": PRINT "TURNS. 
) THE DAUGHTER ChNNOT BE RE 
ACHED" 

1670 PRINT "UNTIL A CERTAIN ROOM 
IN THE HOUSE HAS": PRINT "B 
EEN VISITED." 

1680 PRINT : PRINT " BEWARE OF 

SHOSTS AND BOBLINS, AND": PRINT 
"THE MAD SCIENTISI, BUT MOST 
OF ALL YOU": PRINT "MUST RE 
SCUE THE DAUGHTER. " 

1690 PRINT 

1700 PRINT : PRINT " 6 
D LUCK'!" 

1710 SOSUB 1500; RETURN 

Encoded message data. 

1720 DATA "YVZF6RUF0 NZFTS8VI MV 
2iyBI","GSVIV'H Z OZHVI TFM 
LM 6SV 6ZY0V RM","UILMG LU B 
LF","GSV WZFTSGVI RH SVIVI", 
"6SV UVMKV RH HGROO LH.",'GS 
I V «LLI HOZNH HSF6 YVSRMW BLF . " 

^- MAD 
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1730 DATA "BSV TZGV XORKPH HSF6 
YVSRMW BLF, ZHW","BLF SV2I 1 
HLU6 SFN m GSV UVHXV RH"," 
V0yYGIRURVW.',"6SV UVMXV RH 
ML OLMTVI VOVXGIRURVK." 
1740 DATA "BLF HSLFOW SZEV NLEVW 
UZH6yi!","6SV NZIil HXRVMGRHG 
HORKKVH ORGS LMV LU","SRH K 
L6RLMH ZMN YQVD fiSV DSLOV SL 
FHV","RI1!(0FWRMT BLF, LUU BSV 
N2K!" 
1750 DATA "L.P., BLF ZMM BSV YVZ 
FGRUFO «ZFTSGVr,'YLGS KVIRH 

5 ZH GSV N2« LOW HXRVM6RHG", 
"YOLDH FK GSV SLFHV.","L.P., 
BLF'EV TL6 GSV N2FTSGVI. OV 

B'H TL." 
1760 DATA "BLF'EV ZOIVZKB TLG SV 
I, HBFKR«.","RB XLEVIVW Z HV 
nVG KZHHZTVDZB", "BLF'EV TL 

6 GSV 0ZHVI.","AAAAAZB6!I"," 
HSLGH 0VU6","HSLL6 DSZG?"," 

BLF' IV LF6 LU ZNNL" 
1770 DATA "BLF WLM'G SZEV ZMBSSR 
MI 8L HSLL6 DRGS.',"DSZG RH 
6SV1V 6L IFN UILN''","GSV1V'H 
HLNV6SRMT RMGVIVHGRMT 6SVIV 
."."BLF KZN'G TVG RG YFS BSV 
IV HVVNH GL YV 
1780 DATA "HLNVGSRMT RMGVIVHGRMT 

SVIV." 
1790 DATA "FS LSI 2"," TSLHB "," 
HPVOVGLM ","QFHB KLKKVtf LEG 
RM","UILMG LU flLF!",»BLF'IV 
LF6 LU ZNNL","TLL« BLIP. B 
LF LFBIZM ",». (FM-","ULIGF 
MZGVOB, BLF TLG 0LH6 RM GSV 
KIL-","XVHH'/" 
1800 DATA "TLB BLF' GLL YZW. Y 
F6 YVBGVr.'OFKP MVCG GRNV!" 
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SWAT 



TAKI.K 



For APPLE® MAD SCIENTIST 



LINES 



SWAT 

CODE LENGTH 



LINES 



SWAT 

CODE LENGTH 



10 - 40 

50 - 80 

90 - 130 

140 - IBO 

190 - 230 

240 - 280 

290 - 330 

340 - 380 

390 - 430 

440 - 480 

490 - 530 

540 - 580 

590 - 630 

640 - 680 

690 - 730 

740 - 780 

790 - 830 

840 - 880 

890 - 930 

940 - 960 

970 - 990 

1000 - 1010 



DM 
OS 
IF 
BU 
B6 
FR 
HJ 
DK 
ZU 
RJ 

m 

YS 
HF 
DH 
.^0 
KG 
2K 
Z« 
Oft 
OS 
TZ 
OR 



TIT 

308 

367 

179 

87 

258 

159 

208 

117 

132 

207 

155 

190 

379 

292 

328 

239 

365 

392 

434 

394 

352 



1020 

1040 • 

1070 

1100 

1130 

1160 

1180 

1200 

1220 

1260 

1310 

1350 

1400 

1420 

1450 

1500 

1550 

1590 

1630 

1680 

1730 

1760 



1030 
1060 
1090 
1120 
1150 
1170 
1190 
1210 
1250 
1300 
1340 
1390 
1410 
1440 
1490 
1540 
1580 
1620 
1670 
1720 
1750 
1770 



1780 - 1800 

General Information 



lU 

sv 

HU 
SC 
SM 
FE 
IP 
FB 
JQ 
ED 
Q{ 
SE 
6K 
ZB 
TE 
DJ 
LY 
Q6 
PZ 
2L 
BU 
LM 
ZF 



303 
475 
405 
511 
373 
335 
349 
345 
315 
225 
435 
383 

316 
283 
152 
422 
336 
342 
344 
429 
314 
273 




Y <jienerai inTormaiion >i 

These are the standard procedures for the programs published In 
SoftSide Selections. Sometimes, a particular program does not lend 
itself to these procedures. Always read the specific instructions ac- 
companying a program. They will instruct you if there are any 
variances from the following procedures. Also, back issues of Soft- 
SidejTiay differ in some details. 
SWAT 

TARLK 

At the conclusion of each program listing in SoftSide Selections, 
we include a SWAT (Strategic Weapon Against Typos) Table. SWAT 
for the Apple appeared In SoftSide Issue #30. If you missed Issue #30, 
we'll send you a free reprint of SWAT. Send a self-addressed, stamped 
envelope to: SoftSide Publications, Inc. 

Department SWAT 

10 Northern Blvd. 

Northwood Executive Park 

Amherst, NH 03031 

Be sure to tell us that you have an Apple computer. 



Magnetic Media 

Disks are in 16-sector format, created under DOS 3.3. A menu pro- 
gram runs automatically when you boot your disk. Simply select the 
program you wish to use from the menu. Always read the documenta- 
tion first! 

SoftSide Selections disks are duplicated on reliable, professional 
equipment. Bad copies are exceedingly rare. Nevertheless, the trip 
through the mail occasionally results in damage to the sensitive 
magnetic media. If, after a reasonable number of attempts on well- 
adjusted, clean equipment, you are unable to load a program, return it 
to us along with an exact explanation of your problem. We will send 
you a replacement. 

SoftSide Selections media are not copy protected. We urge you to 
make an archival backup copy of your disk or tape as soon as you 
receive it, as our replacement policy is valid only for 30 days. Please 
resist the urge to give away copies of copyrighted material. 



Line Listings 

The line listings in this booklet are in standard Applesoft® format, 
and they appear exactly as they should on your screen when you type 
LIST. Things to watch out for when typing are: 

• REM and DATA statements: Applesoft always LISTs an extra space 
after the keyword. Therefore, you should type one space less than 
what appears in the listing. 

• Spaces between quotes: Applesoft is a bit eccentric about how it 
LISTS these. Just LIST the line after you type it, and compare it to the 
printed listing. 

Also, be sure to use SWAT on your program. Get the free reprint if 
you don't have SWAT. 



System Requirements 



The necessary memory and other equipment you need to run a pro- 
gram are listed in the introductory paragraph of the 
article for each program. (Also see the SoftSide Adventure Series 
elsewhere in this booklet.) 
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Issue 44 Adventure: 
Mad House 

Unjustly committed to 
an insane asylum, you 
must wend your way 
past guards and the real 
inmates, with their vivid 
delusions. Escape will 
be no problem for you — 
or wiii it? 



SoftSide Adventure Series ^OV 

What would you say to a program that asks, "What do you want to do?" 
Well, you might say, "GET APPLE" or "KILL SPIDER", because that's 
how the SoftSide Adventure Series works. 

Each issue, the latest Adventure takes you to another world of fantasy, 
puzzles and thrills. Your first task is often simple survival — and even that 
basic feat can be daunting until you figure out the right way to do it. You'll 
have to be ingenious and persevering, and your rewards will be great. 

To "win" a fantasy/adventure game, you must solve the author's devious 
puzzles, and overcome the obstacles that confront you — whether they be 
dragons, desperadoes — or grade-point averages. Death, should it come, is 
transitory — just re-run the program to live again! 



Experienced adventurers make detailed maps of each world as an aid to ef- 
fecting a solution, but you can omit this exercise if your memory is excep- 
tional. Express your wishes with one- or two-word commands, like "LOOK", 
"DROP SCALPEL", or "GET FROG". Use "I" to get an inventory of your 
possessions. The introduction to each Adventure explains this more fully. 

To start up the Adventure, just run the program called "INTRO", 
"INTRO/BAS", or "INTRO. BAS" on your disk, or select the Adventure 
from the DV menu. On cassette, the INTRO program is the one just before the 
Adventure. 

The Adventure runs in any Apple with at least 48K RAM. 

Here are the encrypted hints for High School, the Adventure in Issue 43. 

The first three hints are of a general nature, and you should use them first. 
The three hints listed for each class will tell you the specific activities that you 
must accomplish there to get an "A" in the course. Don't use the last few hints 
unless you are totally stumped. 



A couple general hints: 

ORHGVM XZIVUFOOB GL BLFI 

VOWVIH. 

BLF XZM YVORVEV ZOO CSV 

TIZUURGR BLF IVZW. 

Trouble with a locked door: BLF 

XZM FHV VRGSVI Z PVB LI Z 
SZNNVI GL LKVM GSV OLXP- 
PVW WLLI. 
History Class: 

1. IVXRGV KIVZNYOV. 

2. WIZD NZK. 

3. DIRGV GVINKZKVI (DRGS 
KZKVI ZMW LI KVMXRO). 
Typing class: 

L OVZIM PVBYLIW. 

2. GBKV KZKVI (DRGS KZKVI). 

3. GBKV OVGGVI (DRGSKZKVI). 
English class: 

1. IVXRGV NZXYVGS — BLF 
NFHG SVEV URIHG. 

2. IVZW VCLWFH — BLF NFHG 
SZEV RG URIHG. 

3. DIRGV HGLIB DRGS KZKVI 
ZMW KVM. 

Algebra class: 

1. HLDEV VJFZGRLMH. 

2. UZXGLI GIRMLNRZOH. 

3. OVZIM WVURMRGRLMH. 
Geometry class: 

1. OVZIM GSVLIVN. 

2. NZPV KILLU DRGS KZKVI 
ZMW KVM LI KVMXRO. 

3. OVZIM WVURMRGRLMH. 
Computer lab: 

1. WIXD UOLDXSZIG. 

2. OLZW Z KILTIZN UILN BLFI 
XZHHVGGV. 

3. HZEV Z KILTIZN LM BLFI 
XZHHVGGV. 



Gym class: 

1. KOZB ELOOVBYZOO. 

2. KOZB YZHPVGYZOO. 

3. KOZB YZWNRMGLM. 
French class: 

1. OVZIM ELXZYFOZIB. 

2. IVXRGV WRZOLTFV. 

3. WL SLNVDLIP DRGS KZKVI 
ZMW KVM LI KVMXRO. 

Band class: 

1. XLFMGGRNV. 

2. KOZB BLFI UOFGV. 

3. IVZW BLFI NFHRX. 

Biology lab: 

1. WRHHVXG UILT. 

2. WRHHVXG DLIN. 

3. WL BLFI SLNVDLIP DRGS 
KZKVI ZMW KVM LI KVMXRO. 

Use these hints only if you are 
desperate: 

FHV GSV XLNNZMW ORHG 
EVIYH GL HVV ZOO GSV 
KLHHRYOV EVIYH GSV ZWEV- 
MGFIV FMWVIHGZMWH. 

To graduate: KZHH HRC 
XOZHHVH; KZB BLFI ORYIZIB 
URMV; KZB BLFI TIZWFZGRLM 
UVV; DVZI BLFI XZK ZMW 
TLDM; TL GL GSV 
ZFWRGLIRFN. 

How to use your money: 

YFB KZKVI DRGS XLRMH 

XSVXP LI NLMVB. 

KZB URMV DRGS XLRMH 

XSVXP LI NLMVB. 

KZB UVV DRGS XSVXP LI 

NLMVB LMOB. 
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Here's SoftSide Selections, the handy, pull-out 
booklet with program listings for your Apple II, 
11+ or lie computer. This issue, SoftSide Selec- 
tions for the Apple II family features: 

• Broadway — "There's a broken heart for every 
light on Broadway." Here's your chance to pro- 
duce and direct a Broadway play. Can you get 
financing? Will it be a hit, or will the critics pan it? 
Time to get investors! 

• Mad Scientist — In this interactive fantasy, 
you, as the hero of the story, must rescue the mad 
scientist's beautiful daughter before her insane 
parent blows up the house. 

• Apple DV Bonus: The Prisoner 

The Prisoner is a huge, deliberately frustrating 
adventure, in which you must escape the 
totalitarian "Island," a bizarre prison camp for 
spies, like you, who know too much. This enor- 
mous game occupies the entire second side of a 
special, two-sided disk. Based on the British 
television program of the same name. 

• The SoftSide Adventure Series — 
Issue 44 Adventure: IMad House 

Unjustly committed to an insane asylum, you 
must wend your way past the guards and the col- 
orful inhabitants, who include most of the major 
figures of history — or so they say... 
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